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TECHNICAL DETAILS 

3.5" 250Kdisc drive " " 

Double density disc interface 

Parallel piintei interlace 

Joystick interface 

Video monitor interface 

Peripheral through connector 

Built-in power supply 

Utilities on EOM including format and verify 

RAM disc facility 

Random access tiles iully supported 

Connections for second drive upgrade 

Comprehensive user manua l 

Total: E199.9S inc. VAT ~ 




Discovery - 
helps your 
Spectrum 
make all 
the best 
connections 
for only £199-95 

In one simple step you can now transform your 

Spectrum into a complete computer system. 
Discovery from Opus Supplies is a sophisticated 
computer nerve centre combining not just a 
powerful disc drive and double density disc 
interface but the most comprehensive range ot 
interlaces capable of running printers monitors 
joysticks and other peripherals 

No other system can oiler your Spectrum so 
many options - allowing you to play the very latest 
games or providing facilities for serious business use. 
Discovery's specitication includes over £300 worth 
of Spectrum peripherals and yet, at just £199.95, this 
remarkable all-in-one system costs less than a disc 
drive and interface combination. 

Just connect Discovery to the rear ol your 
Spectrum and you've started the transformation. 
Now you have immediate access to the very latest 
Japanese 3H " disc drive controlled via a powerful 
and ingenious double density disc interface. The 
'■mit's built-in power supply feeds both Discovery 
and your computer allowing you to dispense with 
your Sinclair power supply 

The Opus system takes no user memory from 
your computer giving you full compatability with 
all tape-based software including programs 
designed for use with microdrive and Discovery 
even has its own RAM disc allowing you super last 
access times. 

Now the choice is yours Connect up a joystick or 
a printer to the built-in Discovery interlaces link-up 
to a video monitor or incorporate your own choice 
ot peripheral using the through connector. 

Whether you choose Discovery lor games or 
business use you can rely on a complete range of 
readily available disc software produced by many 
of Britain's leading software companies and our 
price ot £199.95 includes an unbeatable two-year 
free warranty and free delivery 

Discovery is available nationwide from Boots 
and from all good computer stores across the 
country Ring us now on 073765080 for details of 
your nearest dealer, or to order your Discovery. 

Trade and export enquiries welcome 

•price quoled relersto Discover? unit only 

Opus Supplies Ltd, 
55 Ormside Way, 
Holmethorpe Industrial Estate. 
Hedhill. SURREY RH1 2LW. 
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MASTERFILE 



HOME & BUSINESS FILING SYSTEM 

The most versatile database for the 48K Spectrum 

• Up to 36 User-Defined screen/print formats per file, and each 
can display different selection of fields, in different sequence. 

• High efficiency data packing, no wasted fllespace. 

• Super fast, multi-level file search, record selection capability. 

• Up to 51 columns, and 22 lines per record can be displayed. 

• From 1 to 22 records at a time can be shown on screen. 

• Up to 128 characters per field. 36 fields per record, 

• Compatible with Tasman, Euroelectronics and Kempston 
printer interfaces, and adaptable for most disc systems. 

"... the best database for the spectrum Is now even better." Sinclair User. Jan '85. 

Design your own print layout with MF-PRINT. 

• Masterfile version 09 £14.95 1™™^™- 

• MF-Print E6.95 iC^SJa"'" 

• Masterfile with MF-Print £19.95 5M?^£, 

• Enhanced version available for Amstrad at £24.95 
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Campbell Systems (Dept. ZX) 

57 Trap's Hill, Loughton, Essex 

F^ IGIO 1TD, England. Tel: 01 508 5058 
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system is very simple and takes 


P&P, a reasonable price and well 




clever. All the standard 


only around ten minutes, and 






SAVE/LOAD operations are pro- 


four of those are loading the 


The interface is on sale direct 




vided although VERIFY is not. 




from TRL at El 1 1 .25 inc. VAT 






The interface has proved to 


and P&P, 










ed. To briefly recap on the 


first version, 1 have "eve- hart * 


used with its predecessor. 


Opinion 


readers who missed our review 


The original version dc not 




This is now THE disk drive inter- 




provide sequential load ng ant 


Extras 






saving a 255 byte sector ;' 
















version is greatly inpmvud o v 


Especially interesting to those 






the addition of bath sequent ai 










- ;. games as well <is usini] n fci 




with theZX Interfaces 1 and II, 


oatibility, the latter ol wnich 






and has a power supply socket 




Button', This performs -lis same 








operation as the Miracln Mic-o 








driver does (or (VI ic rod rives, in 






The" iniMface takes a mere 








12B bytes of memory for its 


Spectrum's RAM memory is 








dumped to disk by pressing the 


distinct impression that they 


type, 40/80 track, single or dou- 




















This means that ANY pro- 




theirownPSUs. 


manner yeT contains^ ^heln' 




Technology Research Ltd., 








Central Trading Estate, 


face is that the system chucks 


qu„e. Converting such pro- 


with different fast loaders and 




r. 




ZXCOMP 


JTIfJG DECEMBEH/JANUARY 1 985 



^ARTWORX 



aaw 



What comes 
out ofc the Mat 
is up to l/ou! 



am. 



wmwrm<- 


^^^X 


WWW •* 



jBglgiBl il Ramex 



Across the Pond 



jmmand mode, type m; SAVE 
file" CODE 26710, filelenglh, 
here lilclength = the length of 
me MSCRIPT file noted .'aii.er 

by Mark l. Fendnck Is^fMTXtZ 

^^^^^^^^^^^^^^^^^^^^^^^^^^^^_ 2000'J which will cover any file 



was an in- anything to SAVE In 



MSCRIPT SAVEs i 



the people who own them, and it 


Comms 


myZXei (with Memotech 64K 


non-standard header which can- 






add-on) to those uses. And not 


not be reLOADed using the nor- 


lies. Tonight, major league 


That brings us to another 




n-.-n Sinr.lar LOAD command. 


Wr^TX«WM 


popular use for the Sinclair com- 


tended to transfer' her 


1 his will create a header with the 


looking to my T/S 2068 to fill 






..ire;,s :.j which ;hc (lie is to be 








reLOADed, as well as the file 


my computer to many uses in 


your TS/ZX or T;S 2068 com- 


re trad ted to thebedroom (where 


length. Press the ENTER key, 


that "not to£ tong'ago would 


municate with other computers 


JesVm^e'rf- ,-°,™d h |'?. 


:..'■■/■ .irocedure.butassoonas 


have been nothing more than 






■-" hv.>der Ithe short first part of 


science fiction. But Clive Sinclair 


t ion to the ability to send baH 


software. Soon r v bus : n«*s 


'■ .- :-.AVE) is recorded, you may 




electronically, there aii five 












CAI-j SHIFT/BREAK combina- 


this column, probably for you as 


puter/modem combnatic- "he 


computer age. and fe grade 














vices such as The S j-rcc. Co/r- 


class na^ageiTB'.t package. 






Unserve, and Delph w-:Ji;w; 


Wher I :.m :ht lack o' Quality 


i.p.: ..ontainlng the MSCRIPT 




vide a wide range t>l se> =es 




1 side: NOT enter the MSCRIPT 


with the ZX80 and 7X81. a-c 




earV days. I so^ignq n. bbshera 


■. ;",\.ire though), and type; 




vices, weather si.d -ir.w«. 'nr a 


a id tv nwn Teaser's Grade 


LOAD ■' ". As soon as the 


having one could now ilhrdu 


fee ibat-sd on tho m.mbei o' 


■jj::. mnmx). Invoice Contrui 


i.. ..I- has been read (you will 


But, how many o» us act.e ry 




bJB tpe Firlancial Record K&opei 






there s something tr,: alSost 


series >.j,.-n computer Se- 


upc ,nd manually rewind the 




anybody Oie of ths (host 






bought them? For that -ratter 




But how aoo.t yot-r What dr. 








,:.. do w in your Sinclair cot 


•Me tape with the dummy 






p-"e'> Drop ire ;n-o a-c at ma 


header. Type LOAD "file" 


weight for lack of a worthwhile 


sai.e-s with :)iri-r sompute< 


. lew what y Our computer nstfo- 


CO. :l and press ENTER. As 


8d daily? It is with this question 


one of the byproducts of this 


mg t ese ays. / j&toc^ 


tip the recorder 100 




new technology. Many Sinclair 


MSCRIPT 


r\OT PRESS BREAKI. put back 








the MSCRIPT file tape and press 


First and foremost at the pre- 


the weekly conference each 


As promised, here is the pro- 


PLAY on your recorder. You will 


sent time are the wordprocess- 


Wednesday night l3t 10.00pml 


cedure for sending MSCRIPT 




ing abilities of my T/S 2068. 


on CompuServe. By typing GO 


files using MTERM and your 


■,-,■■■ ■■■,-,■ iprobabhrendwithan 




PCS-54 dozens of Sinclair com- 




error message. Don't worry. 


umn, it was done on a conven- 


puterists can get together to 


which are necessary for you to 


noihirc is wrong, and it should 








ba expected. Stop the tape, and 


that once 1 typed a sentence or 




address of the start of the 


LOAD your MTERM program, 


two. and decided to change it, 1 




MTERM buffer, and how the 


Ijuniu not PRINT USR 54016. 


either had to resort to tlpp-ex, or 


ed wilh ihese services, there are 


MTERM software knows that 




retype the entire page. With the 




there is something actually in 


in rhii MTERM menu, the buffer 








■.veil.:: show that it is empty. 




enthusiasts. Many of them cater 


first question is simple, as the 


Tins is because ih« and of the 


type: even after it is printed. 




MTERM buffer always starts at 


in.ifei is moicated by the system 


Since my best ihuughls sw.'ii lf> 


computers. They consist mostly 


address 26710. You will need 


■-■HinaLikVAHS llyuuweretoin- 


always come the second time 


of a message base where callers 


to know this address in order to 


vi-jtii.iate. you would find that 


around, 1 cannot imagine being 




place your MSCRIPT file in the 


VAHSiscuii-mlv-, lining to ad- 








dress 26710. POKE 23628, 






Once you have SAVEd your 


200 to change that, and then 


Until recently, 1 made my 




MSCRIPT file to cassette in the 


HLiiivme MTERM. Nowyouwill 




programs. One such bulletin 
















Sinclair community can be 






mail and hoped for the best. The 


reached at (7181 296-2229. 












Take my word for it, it Is not 




first ordered my ZX81. 1 really 








did not have any specific use in 














{Read on. . .the procedure for 


uses to justify the purchase. 1 


back on, to clear the MSCRIPT 


really is. 



Try beating our SpecDrum! 




Drum 

Digital Drum System 
for the Spectrum 



£29.95 



m 



MS* 



• JUST PLUG INTO YOUR HI Fl 



Ch eetah 



Marketing 



•-, 
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PL HARDWARE 



Micro 

Peripherals QL 
Disk System 

we take a look at the Sinclair approved 
unit for disk storage on the QL. 



3.5, 720KB(formaned!. double 

two of these drives. The drives 
PSU attached by a 6-pin Din plug 




PL HARDWARE 



specific files. 
SPOOL_X, allow 
files in ASCII form 



COLPRINT, allows 



provide a good ra 
g rammer. 

muse 

Connecting to ihi 



is called on power up instead oi 


reedy for useon the disk, after all 


The disks themselves are 














is typed rather than MDV, a soft 


under the Sinclair banner. If this 














system is the fact that specific 


operates on MDV instructions. 




drives must be used and the 








bvtesec^of'the disk" 3 5 ' 3 


machine and not have to cope 


is unsuitable. This means that if 


VSFf is useful as you canassign 
a three letter name of your own 


A variety of other software 
by Sinclair, Micro Power and 
















disk using FLP could he used. 




sive, (appro* £5.00 compared 


reasonably straightforward 




A further problem which 1 








opl%tethe S ys[Lm n w?t™ut h the 


i.ii-.ii. Tin: biggest advantage of 


stTdard 5 format e 'The nD ne 5 1 




this system over others is that it 






is supplied as a package. This is 








peg' system this une is ideal, but 


















additional memory and perrellel 


with reasonable ease, although 












that it worked best to copy the 


reliability of storage of files and 


Technology Research Interface, 



SHARP'S INVADES ENGLAND! 



WAR in the EAST c™ 

The simplest of the four but our best seller. As 
commander of the German forces you must 
launch a surprise invasion of Russia, capture 
and hold Moscow before the weather and the 
Red Army overwhelms you. Effects of terrain, 
weather and fuel supply. Eleven types of divisions 
and brigades. Vk hr. playing time. Also for 
1 6K-ZX81 . 

FALL of the THIRD REICH £9.95 

As the German player your devastated army must 
hold off the Allies and Russians on two different 
fronts, and hold Berlin as long as possible. Ef- 
fects of rivers, forts, and mountains. Multiple 
attacks are used on both sides. A real nightmare 
for the player. 1 hour playing time. 



ARDENNES 



£9.95 



BRITAIN INVADED! £9.95 

The most advanced of the four games. The play- 
er must defend England in this hypothetical in- 
vasion during WW II. Effects of rail lines, weath- 
er, terrain & ports. Scrolling map, multiple at- 
tacks. Every German invasion is totally different 
All this, and more makes this game a must! Vh 

hr. playing time. 

Each game has a hi-res. map in color with sound. 
These are true military recreations of what hap- 
pened. The ending depends on you. These are 
not arcade or adventure games! No fast reflexes 
required. Not recommended for young children. 

Spectrum 48K 

No postage or handling required. All orders dis- 
patched in 48 hrs. via air mail. Guaranteed satis- 
faction. Thousands sold in U.S.A. 
Order by check/P. O./Visa. 



In adesperc 


te attempt you have to break Ihrou 


the Allied I 


ies, inflict heavy losses and capt 




ns ms possible lo prevent "Fall of 


Third Reicl 


'. Scrolling map — brigade and re 


ment size. 2 


hours p'aying time. 



ille, VA 231V 

S.A. 

1 730-9697 
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■SPECTRUM GRAPHICS)! 



Screen Master 

For those of you wary of attempting 

our machine code graphics series, 

Matthew Probert presents a powerful 

screen artist program in BASIC. 




^SPECTRUM GRAPHICS! 




■SPECTRUM GRAPHICS^ 



Brush functions 



Tape fUnCtiOnS does not dear the display. ' Sixdiff 

There are just two taps tunc- Text fUnCtJOnS t J^ e , 



Attr functions 



displayed anywhere 

may be graphics, sel 

pressing the graph 

The teitt may be dis 



jlected by key B swit- CAPS sli;fi and k ( 
■jriti'imsss from on to If you wish to ex 
rom off to on auto- pressing whils- 



lent and Freehand functioi 

Status functions 



' ,„"U ",!;," 



Status- uh-.h ;, selected by T|1B prog , om UBes sev , 

"j^'-V ■ :'." ■ i .'y S !'"' '- ;DG 5. from O to iJ ri! Wf .i.:l.v 



a saued as Data, by; 
.; F.3FAK ro break into 
M.ssici. lyping NEW to 



9 t et i-h: let p=~>: let b-b: 
LET A-0 

10 LET BL-a: LET X-12H: LET Y= 
88: LET Xl-x: LET Y1=Y: LET Z-4fi 
00! LET ST=23296: let rt=23308: 
LET PL-IS LET ZA=0 

70 POKE 23658,8 



60 OPEN ttG, 

INPUT •* 

130 GO SUB 2 
150 LET G*=II 



F" 


THEN 


GO 


SUB 


1500 


D* 


THEN 


GO 


SUB 


120a 


■C" 


THEN 


GO 


SUB 


1600 


E" 


THEN 


GO 


SUB 


1700 


A" 


THEN 


GO 


SUB 


2000 


l" 


THEN 


GO 


SUB 


llll 


P' 


THEN 


GO 


SUB 


3200 


y- 


THEN 


GO 


™ 


3300 



250 IF G*= 
260 IF CODE G*=7 THEN INPUT ■ 
: RANDOMIZE USR 23296: GO TO 10 

270 IF G*="W THEN RANDOMIZE I 



da tf rniiF gs= 



LET G*=INKEYSS 




IF (G«>-*?i" AND GS 


< = ■ 8 " > OR 


DE GS>-B AND CODE E 


*<-ll) TH 


GO TO 1050 




IF CODE G*=I3 THEI 


RETURN 


GO TO 1020 




LET X1=X1- (GI-'5- 


OR CODE G 



jSPECTRUM GRAPHICS! 



1075 INPUT ■■: PRINT HGiTAB 3;"X 
:";XliTAB 10! -Y: ■ ( Yl i ■ ■ i TAB 17i " 

1080 PLOT OVER 1 J PEEK 23677, PEE 

1035 PLOT OVER 11X1, Yl 

1105 INPUT "■: PRINT HGiTAB 3!"X 
J* |X1 I TAB 10{ *Y: "i YliTAB 17i"Xl: 

1110 PLOT OVER l;X,Y 
1120 LET GS-INKEY* 

1130 IF (G*>="3" AND G*<="8"> OR 
(CODE G«>=8 AND CODE G*<=111 TH 

1135 IF CODE G*=13 THEN RETURN 



3 AN] 


X>0) 


IG*="8" OR CODE GI=9 


AND > 


<255l 




1170 


LET Y 


Y-<G*-"6" OR CODE GI- 


10 AND Y>0 


+1G*="7" OR CODE G5=l 


i AN 


Y<17 


) 


1175 


INPUT 


■■: PRINT HGiTAB 3i -X 


: "iX 


[TAB 


0i 'Yl " ; Yl;TAB 17! "XI: 


"iXJTAB 24 


■Yl: ";y 


1180 


PLOT 


OVER liPEEK 23677, PEE 


K 2367B 




1185 


PLOT 


OVER UX,Y 


1190 


GO TO 


1120 


1200 


INPUT 


TAB B; "ANGLE OF ARC? 


"I L 


NE 8* 


IF B*>="A" THEN GO 


TO 1 






1201 


LET A 


•VAL 8« 


1202 


PRINT 


HGITAB 14} "DRAW 


1203 


PRINT 


FLASH 1! OVER 1 ! AI 2 



1204 PAUSE 100: PRINT FLASH 0! 

1205 IF CODE INKEY*=13 THEN GO 
TO 1205 

1210 GO SUB 1000 

1217 PRINT FLASH 11 OVER 1 | AT 2 
1-Y/B.X/8I" " 

1218 PAUSE 100: PRINT FLASH 0; 
OVER 1;AT 21-Y/B,X/BJ" " 

1219 IF CODE INKEYS-13 THEN GO 
TO 1219 

1220 GO SUB 1100 

1230 DRAU INK Ii PAPER Pi BRIGH 
T B!X1-X,-Y1-Y,A 



1260 IF INKEY*="Y" THEN RANDOMI 
ZJE USR ST: RETURN 

'0 PLOT OVER 11X.Y: DRAW INK 
II PAPER Pi BRIGHT Bi OVER 1;X1 

12B0 GO TO 1200 

r INPUT ■■: PRINT HGiTAB 12{ ■ 
FREEHAND" 
1505 IF INKEY*<>"" THEN GO TO 1 



iTAB 13," "MOVE- 



IE NOT POII 



1527 IF G*="E- THEN LET PL=2: I 
NPUT "": PRINT HGiTAB 131 "ERASE" 
IF IGS>-"5" AND GS<="S"I OR 



1532 IF (CODE G*=13 AND <X=128 A 

IF CODE G«-13 THEN RETURN 
IF PL=1 THEN PLOT INK Ij 

1551 IF PL=0 THEN PLOT OVER U 

1552 IF PL. =2 AND POIWT [X,YH-1 T 
HEN PLOT OVER 1JX.Y 

1553 LET X=X-<GS="5" OR CODE G*= 
8 AMD X>0i*(Gi^"e i1 OR CODE G*=9 

LET Y->Y-{G««*6" UR CODE G*= 
ID Y>0)*(G«=-7" OR CODE G*=l 

INPUT "": PRINT HGiTAB 10; " 

HEN PLOT OVER liX.Y 
600 INPUT TAB 10i "RADIUS "1 LIN 



X*R>255 OR : 



^SPECTRUM GRAPHICS^ 



INPUT TAB ! 



*>-"A" THEN GO - 
=VAL O*: IF NOT : 






1725 LET YR=VAL S* 
1730 IF X*XR>Z55 OR > 

>173 OR Y-YR<0 THEN RE1 
"40 LET NA=XR*YR: IF NA>: 
LET NA=l: GO TO 1750 



00 FOR Y-0 TO 15 
03 LET Yl=<173-R*< 
10 FDR X-0 TO 15 



PLOT OVER II 



THEN GO SUB 2700; 



IF INKEY*="Y" THEN RANDOMI 
RANDOMIZE USR RT: GO TO 170 
INPUT -LENGTH "i LINE 0*: I 
LET L=UAL H*: IF NOT L THEN 



2250 PRINT OVER li 
2260 LET G*=INKEYS 



1825 LET H=VAL ' 
ETURN 



PAPER P! 



BRIGHT B;0,-H: DRAW INK f, 
i BRIGHT B! PAPER Pi0,H 

3,X: POKE 23729, 



NT AT A,AA;"B': LET B*(AA,A 
2295 PRINT AT A,AA!B*IAA,A1 
2300 IF G*=-0- THEN PRINT i 

2310 LET AA=AA+(G*=-B" OR CI 
*=9 OR G*=-<" AND AA<l&>-<6< 
OR CODE G*=8 OR G*=-*- AND 



2030 LET X1=C*8: LET ' 

2040 DIM B*(16,16l 

20B0 INPUT ■■: PRINT I 

PLEASE WAIT' 

2090 IF BL-1 THEN FOI 

: LET B*(N)='t 

NEXT N: GO TO 2170 



l=I75-R*8 



■SPECTRUM GRAPHICS* 



THEN GO 



i!2 FOR N-! 



PLEASE WAIT 
2516 FOR N=t 
2520 FOR M=F 



3400: LET R1=R: 
2Z528 + CH-32*RI 



2550 


NEXT N 


2560 


POKE AT, O(l): POKE AT+1,G(2 


1 : P 


IKE AT+32,8(3): POKE AT+33.S 






2562 


IF ZA THEN GO TO 5360 


2563 


RANDOMIZE USR ST 


2564 


LET X=PEEK 2372B: LET Y=PEF 


K 23729 


2565 


RETURN 


2730 


FOR M=l TO 16 


2740 


FOR N=I TO 7 


2745 


LET TS=B*(8+N,M1 


2750 


LET B*(8 + N,ht)=B*(N,MI 


2755 


LET B*<N,M)=T* 


2760 


NEXT N 


2770 


NEXT M 


2790 


RETURN 


2830 


FOR M=l TO 7 


2840 


FOR N-l TO 16 


2843 


LET T*=B*1N,8+M1 


28 50 


LET BSUN,B+MI=BSIN,M> 


2833 


LET BI(N,M1=T* 


2860 


NEXT N 


2870 


NEXT M 


3800 


INPUT ■ REFLECT ABOUT X 


OR Y 


! LINE OS 


3010 


IF 6WO-X' AND WO'Y' THEN 


BO 


TO 3000 


3020 


LET XR=HS="X" 


3030 




3040 


GO TO 2000 


3100 


INPUT ■-: PRINT HGi ■ PRESS 


TO 9 FOR INK COLOUR" 


3110 


IF INKEYSO" THEN GO TO 3 






3120 


IF INKEY*<"0" OR INKEYS>"9" 




GO TO 3120 


3130 


LET I=UAL INKEYS 



NT MGi " PRESS 
COLOUR- 
THEN GO TO 3 



3420 INPUT ■■: PRINT KG; 
OVE S8UARE TO POSITION" 
3430 LET G*=INKEY« 
3435 IF CODE G*=13 THEN 



IF 



3450 LET 
=10 AND R 

=9 AND C<: 



OR CODE M= 



3650 POKE 23300, S-2' 



3490 PRINT OVER 
T R+l,Cj " 

3500 GO TO 3430 

3610 INPUT ■■: PF 

ELECT 1 TO 4" 

3620 IF INKEY*<>-" THEN GO TO 3 

3630 IF INKEV*< ■ 1 " or INKEYS>-4" 

THEN GO TO 3630 
3633 LET G*=INKEYI 

G*#6848 
i6*INT (S/256 
I ■■ POKE 23301, INT (S/Z56): POKE 
23309, PEEK 23300: POKE 23310, PEE 
K 23301 

3660 INPUT •■• PRINT ttGiTAB 10;" 
SCREEN- "iVAL 6* 
3670 GO SUB 2 

3710 INPUT "TEXT "; LINE TS 
3715 LET R-0: LET C=0: PRINT IN 
K 8; OVER l; FLASH 1 i AT R,C;"H" 
3720 PRINT N5; "MOVE SBUARE TO RE 
BUIRED POSITION" 
3725 IF INKEY*<>"" THEN GO TO 3 



■SPECTRUM GRAPHICS^ 



3750 PRINT OVER If FLASH 0;AT R 

,C) ■■■ 

3760 LET R=R+IG«="6" OR CODE GS= 

10 AND R<21)-(G«=-7- OR CODE G*= 

11 AND R>0> 

3770 LET C-C+1G*='B- OR CODE GS= 
9 AND C<311- (GS='5- OR CODE G*=B 

AND C>0> 
3780 PRINT OVER 1) FLASH 1 | AT R 

,C1 ■■■ 

3790 GO TO 3730 

ER P;AT R.C1T* 

3810 GO SUB YN 

3830 IF INKEY*='Y- THEN INPUT ■ 

-: RANDOMIZE USR ST: RETURN 

3B35 INPUT ■ " 

3B40 RANDOMIZE USR RT 

3845 PRINT OVER 1 i AT R,C; - B" 

3850 GO TO 3720 

3905 DIM S*(10) 

3910 INPUT -ENTER TITLE FOR SAVI 

NG"! LINE S* 

3915 RANDOMIZE USR st: border p: 

RANDOMIZE USR RT 
3920 SAVE SSSCREEN* 
3930 RETURN 

TER TITLE FOR LOAD 
INS"! LINE S* 

■ THEN LO 
AD "-SCREEN* : GO TO 4030 
4020 LOAD S*SCREEN* 
4030 RANDOMIZE USR ST: RETURN 
4105 LET CH=164-UAL G* 
.10 LET R"0: LET C=0 
1120 PRINT OVER HAT R.CiCHR* C 
I 

NT MG| "MOVE BR 
ISITION ' 

F G*=" ■ THE 



C-C+ 1G*=": 



4235 INPUT 



4320 IF A>255 OR A<( 

4310 
4330 POKE 23328.A 
4340 RANDOMIZE USR i 
4345 IF A>127 THEN 



4346 IF A>*: 


THEN LET A-A-64: 


ET B=l 




4350 LET P- 


NT (A/8) : LET I=A- 


NT (A/8>*8) 




4360 RETURN 




4510 GO SUB 


3400 


4520 PRINT 


T R,c; ■ ■; AT R+l, 



4530 GO SUB YN 

4540 IF INKEY«-"Y" THEN INPUT 

■: RANDOMIZE USR ST: RETURN 



I LET R-R*(G*="6" OR CODE GS= 

(NTJ R<21l-IG*-"7- OR CODE G»= 

AND R>0> 

■160 LET C=C+(G*=-B" OR CODE G5= 

1 AND C<31t-(G*="5" OR CODE G«=B 

PRINT OVER I|AT R,C;CHR* C 

180 IF CODE GS<>13 THEN GO TO 



^330 


INPUT ■ 


: PRINT 


ttGlTAB 


5040 


FOR Y=0 


TO 15 




Sfl^g 


LET Yl= 


175-R#S 


-Y 


5060 


FOR X»0 


TO 15 




5070 


LET X1=C*8*X 




5080 


IF POINT 


IX1.Y1 


THEN 



C DtCEWBEH'JANUARV 1 



■SPECTRUM GRAPHICS! 






il00 NEXT X 
. 10 NEXT Y 
INPUT 



r NEXT M 
.90 NEXT N 
5280 RANDOMIZE USR ST 
5210 RETURN 
5300 GO TO 2000 
5302 POKE 23670, PEEK 23673: POKE 

23671, PEEK 23672 
5305 FOR N=0 TO 20+INT (RND*40> 



',C2I="D-: GO TO 5310 



5650 GO SUB ZI CLS 

SR RT: RETURN 

5700 INPUT ": PRINT ttGITAB 13]" 

OKAY?" 

5710 IF INKEY*<>"Y- AND INKEY*v > 

5720 RETURN 

5B00 input --: print ttGi ■ mdi/e 

CROSS LINES TO POSITION- 
5860 LET X=12B: LET Y-=88 
5S70 GO SUB 6100 

CROSS LINES TO POSITION- 
5860 LET X-128: LET Y-88 
5870 GO SUB 6100 

N GO TO 5B80 

5890 IF G*>"8" THEN GO TO 5BS0 

5895 IF CODE G*=13 THEN GO TO 6 



5375 LET ZA=0 
K 23729 

5380 if inkeys= 
ze usr st: retui 
5390 randomize i 

5400 RETURN 



ttG; TAB s; "S 

IEN GO TO 3 
620 
5520 IF INKEY*<-1- OR INKEY*>-4" 

THEN GO TO 5520 
5525 LET GS-INKEY*. 
5530 LET S=65367-VAL G*#6912 
5540 POKE 23342, S-256+INT (S/256 
>: POKE 23343, INT (S/256) 
5550 RANDOMIZE USR 23338 
5580 RETURN 
5600 CLS 
5610 PRINT AT 5, 13! "STATE" : PRIN 

TAB 111 "PAPER -iP: PRINT 'TAB 

B=ll K-OFF- AND B=0> 

5620 PRINT 'TAB lli-SCREEN tfi 

5630 LET S=PEEK 23300+ 256*PEEK 2 



-5- OR CODE G*=8 AND X>7») 

6020 LET Y=Y+<B AND <G*="7- OR C 

-■6" OR CODE G*=10 AND Y>7M 

6100 PLOT OVER liX,175: DRAW O 

DRAW OVER IS 255,0 
6120 RETURN 
6130 GO SUB YN 

6140 IF INKEY*='N" THEN INPUT ■ 
■: PRINT «Gi " MOVE CROSS LINES 
TO POSITION": GO TO 5880 



THEN RANDOMIZE U 
K Ii PAPER Pi BRIG 



UZE USR ST 
6240 INPUT ■■: PRINT ttG; TAB 10;- 

CONTINUE ?■ 
6250 GO SUB 5710 

6260 IF INKEY*='N" THEN RETURN 
6270 GO TO 6200 



160 RETURN 



is far wider uses. The at 



wise Moves 

Michael Spencer shows us some ways of 

getting things moving around the 

screen. 



stored and displayed but need 
not necessarily be animated. To 
a businessman, 'graphics' 


cess of the work depends an 


graphics. Block graphics involve 


, 




and realism. Correct timing can 


Sii3f.tr, mi keyboard 1 wiich :r.o> r 


176 by Z56 pixels each of 

which car, be iruR-tjjril y sei 






bo used Individually or as part o 










Lirynr shanns which can ho mov 










id sround the screen. The pro- 






display showing train moves is a 


SrmjSESs 


S3S5SI 


:i raw [j.isiiinn after appropriat 
delay. Groups of pixels make u 




























drawn on the screen is erased 
















valves the most complicated im- 




erent place which gives the ap- 








computer screen is only another 








design as an example. A good 


medium on which to display im- 
ages tit may be called electronic 


















paper). The computer may also 


t» FK-M BLOCK QRAPB*tC ANIMATION 




animation is theTrt o^making 


pu ters" as* an i ma tors ° tools "are 


Z'SS CLS 




! 






se LET M<* a U* 










40 LET B9J-" 






Animation is a^at "hat predates 


Disney film TRON about a com- 
puter programmer and his Battle 


50 FOR 1-0 TO 21 




; 




against a wayward super com- 


£0 PRINT AT 1,12 


A* 




a practised skill. Cartoons are a 
much loved example of film 




70 PAUSE 3 






animatio na n d s^i y' a ra phics" - % 


80 PRINT AT I, 12 


B» 


'.' 


animation and such films have 


novel approach that created a 


•IB NEXT I 




,'i 


given pleasure to millions, but 


stunning impact. Computers 


100 GO TO 30 


%« ' 


l ; i 


given much thought to the sheer 


process of producing images for 


































■'. 




l^.-'r.^m^'m^ybeVssible 


Id image at each* move °lf 1 no 


sci'eircan be detected and th! 


■!.' 


object T'joesn-rwke'™^ 


■■• ::-cduce a complete film in a 


lanking took place — using 
ither method - then the effect 


Sha'pes^an'be made°to refund 


I; 1 , 


now many individual pictures 


■ ig i ::RAV super computer to 


vould be spoiled by the image 
eaving a visible trail, the image 


from obstacles, a method use( 


m 




being drawn and redrawn to 






™Ca'"™™° we'ei exam:. - :>< 






plosiunt; which is again a widek 






aper. The technique is summed 






skiirof a^ anPmator'to dra w a ™ 


Ame°can\ C r°the Govtrnmen" 


raw Bloc- graphics are useful 


"ram'Vff ure TTu* P, °" 


"!' 


which, when filmed, givetheim- 


and has since made contribu- 


v U e ta hav e e bD a r ccers''to Un 1 , x eli i 


pixel animation and' collision 


In',' 


pression of motion. There are 




raphics. 






mSd e el!cutZTnd?ostZtao n - 


preparation of the image. 


Pixels 


Sprite graphics, unfortunately 


be 


eTample^.These tTc'hmq'ues are 


the manipulation that is at the 




ma^ed t^wrftt Trrtemi™ 


to 


puters to aid such activity, 
drawn animation is more directly 


heart of the technique of anima- 
tion. The computer offers the 


(ia^mosnmportantly°X!ir 


implementation nf this feature 
which is normally suppurux: by 
a dedicated chip. A Sprite is a 
sua pc thai is defined and moved 


£ 










































ge. The Sinclair Spectrum has 


gran, m figure two has s'mpfe 


put 
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GRAPHICS 



s;r::;|hl reve 

Lines 



Bang! 



IB 


REM PIXEL GRAPHIC ANIMATION 




REM AND COLLISION DETECTION 


31 


CLS 


10 


REM DRAU BORDER 


50 


FOR 1=1 TO 20: PRINT AT 1,1 


i "B" 


! PRINT AT I,30| •■■ 


60 


NEXT I 


70 


FOR 1^1 TO 30: PRINT AT 1,1 


i "■■ 


-PRINT AT 20, I| -B" 


B0 


NEXT I 


90 


GO TO 220: REM MAIN PART 


100 


REM PLOT SUBROUTINE 


110 


PLOT X,Y 


120 


PAUSE 4 


130 


RETURN 


110 


REM UNPLOT SUBROUTINE 


150 


PLOT OVER UX,Y 


160 


RETURN 


170 


REM COLLISION DETECTION 


180 


REM SUBROUTINE 


190 


IF POINT <X+XDIR,Y+YDIRI=1 


AND POINT IX+XDIR, Y+YDIR+11-1 AN 


D PO 


NT <X+XDIR,Y+YDIR-1)=1 THEN 


LET XDIR-XDIR*-1 


200 


IF POINT (X+XDIR, Y+YDIR)-1 


AND POINT IX+XDIR+1,Y+YDIR)-1 AN 


D PO 


NT (X+XDIR-t, Y+YDIRI-1 THEN 


LET YDIR-YDIR#-1 


210 


RETURN 


220 


REM MAIN LOOP 


230 


LET X-70: LET Y-100: LET XD 




.1: LET YDIR-1 


210 


GO SUB 170: REM COLLIDED^ 


230 


SO SUB 110: REM PLOT 


260 


GO SUB 140: REM UNPLOT 


270 


-ET X=X+XOIR 




-ET Y-Y+YDIR 


290 


GO TO 240 f,gun,2 



lage depends on 



I conventionally 
i measuring an nb- 
ally described the 



:x computing december/januarv 



10 


REM 


CUBOI 




JING 






20 


LET 


3X-30 


LET 


0Y=4i 






30 


LET 


A- 30: 


LET B-40: 


ET C 


= 1 


3! LET D- 


IB 










40 


PLO" 


ox, a 










50 


DRAt 


0,a: 


DRAW 


B,0: 


DRAU 


0, 


-A; DRAW 


-B,0 










60 


DRAl 


c,d: 


DRAW 


B,&: 


JRAW 


-c 


|-D 














70 


PLOT 


(JX.il 


OY+A 


DRAl 


c,d: 


D 


RAW B,0: 


JRAW 


-C.-D 








30 


PLOT 


OX+C 


OY*D 


DRAU 


0,a: 


D 


RAW B,0: 


JRAW 0, -A 








<TB 


LET 


t-A+1 


LET 


B-B + I 


: LET 


c 


-C + l 


LEI 


D=D+ 










100 


STOP 













10 REM DOUBLE SIZE CHARACTERS 

20 LET XC-1! LET YC-1 

30 PRINT AT 10, 10; "A" 

40 DIM A4B,B> 

30 REM SCAN CHARACTER 

60 FOR X-0 TO 7 

70 FOR Y=0 TO 7 



60 IF I 



■*B0, Y+88); 



LET A(X+1,Y+1)=1 

90 NEXT Y 
100 NEXT X 

110 REM REPRODUCE ENLARGED 
1Z0 FOR X=I TO 16 
130 FOR Y-l TO 16 

NT (Y/21 : IF YC- 



160 LET XC 

KEN LET XC- 

170 NEXT 

IB0 NEXT 





IB REM SIMPLE ROTATION OF 


260 


PLOT 








20 REM CUBOID SHAPE 


270 


ORAU 


X(6)-X(5 


, YI6) 


-Y(5) 


30 LET ANGLE— .15: REM APPriOX 


280 


DRrtW 


X(7)-X(A 


, YI7) 


-Y(6) 


IS DEGREES CLOCKWISE 


290 


DRAW 


X(S1-X<7 


,Y18) 


-Y<7> 


40 DIM X(8) : DIM YI8) 


300 


DRAW 


XI5)-XI8 


, Y(5) 


-YI8) 


50 REM COORDINATES 


310 


PLOT 


Xf4),rt4 






60 DATA 80,80,80,110,120,110,1 


320 


DRAW 


XI8I-XI4 


, Yiai 


-Y{4) 




330 


DRAW 


X(5J-X(8 


, YI5) 




70 DATA 95, 100, 95, 1 30, 135, 130, 


340 


PLOT 


X(l) ,Y(1 








350 


DRAW 


XOI-XI1 


, Y(5I 


-Yll) 


80 REM NOMINATE CENTRE OF 


360 


PLOT 


X(2) ,Y(2 






90 REM ROTATION AT 100,110 


370 


DRAW 


X(6)~X(2 


, Y(6I 


-Y<2> 


100 FDR 1=1 TO B 


380 


PLOT 


X(3), YI3 






110 ^EAD XIII ,Y<I) 


390 


DRAW 


X<7»-X<3 




Y(3) 


120 NEXT I 


400 


RETURN 






130 GO SUB 190! REM PLDT SHAPE 


410 


REM 


PPLY ROT 


TION 




140 REM MAKE RELATIVE TO CENTRE 


420 


REM 


O COORDI 


ATES 




150 FOR 1=1 TO B 


430 


FOR 


-1 TO 8 






160 LET XII )=XII) -100: LET Y<IJ 


440 


LET XII)=<X(I 


*COS ANGLE) - ( 




Yf I>*SIN ANGLE) 






170 NEXT I 


■150 


LET V(II=(X(I 


*SIN 


NGLF) t-t 


180 GO TO 410: REM TO ROTATE 


Y ( I J *COS 


NGLE) 






190 REM DRAW CUBOID SUBROUTINE 


460 


NEXT 


I 






200 CLS 


470 


REM CALCULATE 


SCREE 


COORDS 


210 PLOT XII) , Yd) 


480 


FOR 


-1 TO 8: 


LET X 


I)=XII) 


220 DRAW XI2) -X ( 1 ) , Y <2> -yi i ) 


1 100 


LET 


Y(I)=Y<I 


• 110 




230 DRAW X(3>-X (2) , Y (3> -Y 12) 


490 


NEXT 


I 






210 DRAW X(4)-X(3> ,YI4)-Y(3> 


500 


GO SI 


B 190- RE 


M PLO 


AGAIN 


r" 1 " '""" 


510 


STOP 









■SPECTRUM GRAPHICS* 



Spirogram 



Moving in circles can produce some 

interesting results as Simon Palmer 

demonstrates. 




IX COMPUTING 



jSPECTRUM GRAPHICS^ 



DATA 



DATA 



' DATA 



1490 



LET d«=d*(3 TO ) 
IF d*<>-- THEN GO TO 1040 
READ d* 

IF d*<>-- THEN GO TO 1040 
RETURN 

DATA "DFFE3A2B39E7- 
FEEA2034E5FDCB0I ■ 
BE06031805DFFE2C- 
2026C5E7CDFB24C1 " 
FDCB0 17628 1A10ED " 
FDCB017E2015E122" 
5D5CFDCB01FEEFA0- 
A0A0A0A0A03818D1 ■ 
DATA "C38A1C2A633C2268" 
5CEFES2AE92AEBEC' 
033600020 1 E B3202 " 
3 1 3700F902 A3 3 1 0F ■ 
310FIB31E8E905A1 ■ 
0FEA04 2AE8E90F2 A ■ 
0F04273 1E904EB05 ■ 
7A77CB0205F8E90F " 
A0FC20EC 1 FEAA0F8 " 
F90?>A I 0FEC0431 20- 
01 1F3REFEEEF04ED- 
F 0040F E D EF04EE F ■ 
0403CD02CE02F2F3" 
04 F 1 F4040FF 1 F304 ■ 
DATA 'F2F40403D 1 02D202 ■ 
E6ED0FF 1 0F27E7EE ■ 
0FF20F27F5360022 ■ 
F636001 EF53440B0 ■ 
00FF0337001 4F634 ■ 
' 40B000 A F03 3 7000 A ■ 
I DATA "34B0B000DC222D33- 
I DATA -020202EBA103CB37" 
I DATA ■ 000436 1B0738CDS4- 
f DATA -1F389821925CZ268" 
5C2A63BC22655CC9- 
i DATA 



1270 
1Z80 
1290 



I DATA 
DATA 

1380 DATA 



^ (CR-ADD) to fErat a 



'-X COMPUTING DECEMBER/JANUARY 1 ! 



■SPECTRUM CRAPHICSI 




DECEMBER'JANUARY V 



^GRAPHICS FEATURED 



The udc Bank 

84 UDCs must be enough for anyone. B. 

J. Kamphuis shows us how to achieve 

this on a Spectrum. 



at 



m 



m 



*& 



64000 or 31 232 dt 



;>:t UDG art 



fl SAVE "uctgS" CODE ad- 



fkiiiyu 


linrtyoucou 


d do with 


3ASIC a not 


o be moved by 




1 RFM 










7 REM 


6K uen 


ion 






3 REN 










10 CLEAR 31231 


DATA 42 


,93,92, 


33 


,33, 126 


254 , 87 


202,30, 1 


22,254, 


76 


,202,60 


122,20 


,33, 126, 


214,48, 


3: 


,88, 127 


17,0, 122, 130, B7 


,1,168, 


»> 


237, 176 


201,33, 


126, 21*, 


48, 17, a 










37 


, 176,20 










20 FOR 4-31232 


TO 31248 


READ 


■ : 


POKE * 


b: NEXT 








30 FOR 


-31262 


TO 31279 


READ 


ai 


POKE 4 


s : HEX - 


4 






40 FOR 4-31292 


TO 31309 


READ 


a: 


POKE 4 


a: NEXT 


4 





has loaded the 
CLEAR add 

LOAD""CODE 



St 



A 





1 REM 










2 REM 


48K ver; 








3 REM 










10 CLEAR 63999 


DATA 42 


93,92, 


3; 


,35,12* 


,254,87, 


202,30,250,234, 


76 


,202,60,250,201 


,35, 126,2 


14,48, 


33 


,88,255 


, 17,0,250, 130,87, 


1,169, 


0. 


237, 17." 


,201,35, 


126,214,48,17,8 










37 


, 176.2C 










20 FOR 


4-64000 


TO 64016: 


READ 


a: 


POKE 1 


,a: NEXT 


4 






30 FOR 


4=64030 


TO 64047= 


READ 


a: 


POKE i 


, B : NEXT 


4 






40 FOR 


4=64060 


TO 64077: 


READ 


a: 


POKE 4 


,a: NEXT 


* 
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Graphics '85 

A comprehensive review of the state of 
the art by Colin Christmas. 



As we sec this old vear out and 












... in,-,, ■,!,■■ of FN:: Si.K'cn Anime- 




welcome the new one in, it's a 












lit'Ki i.,in. like Ihe others, be 1 


back and take stock. Looking 












XK^toTR 
















phecies end predictions to 














dTne^a'nd* w&MMiS rrdTsoth™ 














eye on Graphics it has been a 
most excitingyear. 1 can't speak 
for other departments but for 










Y 9P1 




lions and suggesttans', fiiVBB a 














start' of how' powerful a utility 




me. it has been Christmas every 














Screen Machine really is. 




In this issue 1 want to do 
something special -take a look 










J Pi 




wc.'kiiui knowledge of BASIC 
and of the Spectrum Manual 




We? We are the Graphics Grab- 
bers, Artwork Addicts. Design 






t '"*"*' 


— 


■— "■■"■' M 




■ iripswfththfetool.Onaof 












l;n:'i'Si"''h^V'-,^eiiahling S pr&- 


Doodlers. For us the screen is a 














window on a world of colour. 














images, line, shape, pattern, 












to instant Machine Code 
routines for Compressing 1 
Sur-im (lisi)l;-iys. sovfid normally 1 
as 6912 Bytes, but now being 












r°[ W ' ^ "I'"!' '" '.", '""°l"' 






1 _ 


SS-T 


i 


stored as only 3475 bytes. 


p'Lsul" '■■ .-, ■■■ .'■'.,.,:: 




^ 


r 


y 


7 


adapting Screen Machine to 1 


perie'ncedprogrammerand right 












code, 










w 






find Spectrum owners who are 














hooked on graphics. 












especially when teamed up 




It's fairly formidable task - 










This toolkit needs patient and 






cohering ths range of Graphics 




ULl'i: Erii 








every style or requirement, so 




Hardware and Software now 






litis Sk-vK 




those efforts are really reward 






available to Spectrum owners 


th 




n graces o 


pro 6 


^ '■ insta^Tmeal' 1 '™ be V t l 3°ke W n S o 1 | 


From NEW GENERATION 

SOFTWARE '..nne bghlmagle. 






9. r 


ri! Al ■., 










Software 




lL.ciwiy 


£ftfc5mrt 


S o D be 


doodlers dither. Members o 
cither group will enjoy the heart 


straight into and, in the true 1 


PRINT N'PLOTTER Products 










ol the product only. To get the 




have given us two 






,. ,.:. lei 


gned 


most out of it you need some 


you want to do to start off with 


thoroughbreds in graphics 




Gs and s 




UOG 


application skills. 


is to make pictures, play with 




packings, stablemates in fact. 












UDGs and so on. in a light 




Both are already household 




MliIMI,-: •■ 






If Peintplus were an '0' 














Level, then Screen Machine 






Graphics. Paintbox, redesigned 


th 




l'.:|liy",:|jll1 
























first reviewed, and Screen 


so- 


IW |i.' .-,i 


.,.■,,. .,: 








Machine. 




i.iri!5iirof 




























3n».t:. 


. They incl 




Paintplus, to new and mote pro- 








l P! .,-ill,:,| = 


.|j':rw;ish il 




fessional heights. 




Grafpad compatible, and offers 


ty 


i.i Grahh 






The demo programs on the 






Bo 


□raw, E 


arga, Etfil I 




cassette are not only inspiring. 


Spectrum. 








a. One side 




as was the case with Puintplus, 




smooth or slow and smooth. 


3< 


m^K?" 


spi>e S, the 


ain- 


but in the case of Screen 
Machine nr" giso meant lo be in- 


from me. Clear, easy to read, 
■■a-:-:-II liiiinn.;..:! :ind wiih informa- 


Power to program up to eighty 




arted. 






structive. The program for the 
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GRAPHICS 



al of thought w 









,il UDlj M,.,,:!,.: 



b important if a parallelogram. Both are [airly highly tei -,l 

."..■i.is..i.ii:ir.fi.,., l i...-.,,vl.- 1 -.A..::-k ■,.)., :ir. ■..■>! ,v. irl i :n,.,lli/r [„„„ i, is Ll language Itself, apart and sophisticated tools. The 

■■""' T,: " "'■<' r.lw.w»; iif. niiisi-l.- fjiliij.,..- in v.ui' 'Ir.iwim.l |.. ;nl BASIC. H-;n,;,.- learning .:, Ti;,r., ,,,-,.:,..|., ,,l ,i -. I . , . , - I ■■■,! 

poarai il-l.iottoinni ih. ; . screen arm. use H i s learning in |-„c.g':iin ,, .„,., ,,.„i ,,ivot from which ex 

■ i.l-..i! ",en Ire 'picked up' and Liu:ii:>.™;. ; - ■■ yno.i iiliv-;..".;il ampule ■lotly. l.-mynngi.. I,:nrls ;, di ;,.,./. i it, .urn hingetr .it 

!ll ' , "l"l V'H.i :>ii.:l,ir,, <.., design, yon, in. ,.,.,„■, i ■. | -|,i .. .,|.|,|. K ..„|., ,■,.,, i. i,.iii,, I. ,„.,,...,.,....„ 

your 

^j-g am Wtl«lfs ""p ™ 9 ci' W rftaf?™ ■ aHr TS I I '""'"'"'' P ro 9 tB88 '" ln G wit " ,he ™* ThB a™ is connected to the 

''^ lr| .i;-fi |: ■' ' : ' ^-' ■ ' " Hi'- hi:.':|r.-ni [-11... -s\- ':■ r ol 1 1'- I ■!■:>: | rain A:.;:,,,, ir •; |, ...... i i , ,,, |r| ,| s ,,, ,, |lr , r | [ .|.., ^'nvtr mi ,-■ 

■e c .. :" ■■■■ i'V^lledUDQ agoodwayofgaitrgstartedon ,: ,-,. , ,,, .;.,,, T l,. :;. ;. m-||.;.v.V ,.::,-,:'. ~V;. " "" r V 



memory is offered in the COMP- limited Ihouql 
SCREEN option. This is loaded advanced or 
separately from the cassette, designs. Gra ( 



Leotr 


Z'ac'. 


£d £ 


,'M 


nmt h t. 


IS J i.JO( 


t^vh 


id sug- 


irfflSert 


■,;;;;'; 


InTn 




ntoth, 
















nil. I'll 


tion in t 


Mini, 








■"■■"'' '■ " I I'.l'iJ I'"': Ill"' - Ml -I. II -llill., 

further than the °" AD. tumed^p' ^d'tcpi ",,'s' f'fitm ''^li^'dn ,'l 'si'" dilfU.-m 

. l '" : ' ■■■■ ! "i'- , --- i . 1 " 1 -■'■"■ foi lays Wo* Btillan DosTtions can he achieved. By 

,ril - ■■H-'vu U:i oil! I,ivnur,;e. I would rccon- adding r1 ||,»r BASIL rnu x 

s™iTM<iiiiLi almost mend it as another in the and softw no llir Tia™ a 

' ■"! i ' I ■? ■ ■-: n e . '.Ik. Sia c.ireqci-v. With very rtiptibii; ( ii-,.niil>.::, ? «te,Kle,linto 

MiicjflsinK.iiiliMGranhics 

very young child. en The four, .■■il|ituihct.c;s'lly leading yon ZXS I I.' ,,', ,■ . ,,l 

'lir.t l.di-i ■;■ 1I>* IOGO n.io-.i., ■■»i;iVviWi!Mc.:,n> piit.intial can only really be 

for children which Some forty custom shaped only by competent progiam- 



' I "■■ I'l.l.M'l'l I'. .litnm.v.l |.y |„,| |.„ i.l,,, ... ,,,, ,,-, 3n , , .,, I. ., |„., ,,.,, .,.,,.. |. . . | ,;, 

loving a small graphics ■turtle' siderable. standing th- lea' ul run,, in .-.- 

'■■ i nle - around the Similarly, another old of ways. I'm. leim-rig nt ,■;,„„,,■■ 

■■■|...r. This is ..|.,|... Iiy srsiviintj lavuurile VU-3D firm-. =£|0N. ;l. Iln- Hinh Iroel Us.'i r-:i,., .■■!■.■ 

h '-"'y |1 ll" 1 '"''-I- " ■■■■'" T'iisliiisi;i,':.nlii(-rl;int1,i|> 1 >i.!.-iln[ Real :irn.- G.-.r lea n- ■-... ,ri, -i hum 

nrirls !-.r,r,s,i a. Purm.ve Pro enahiino lh. : . viewer to move Melbourne Hoi.sn. Or ■>- il ;, 

-iln-,,.; imos;l v single words around the object in 3D. mote commonly n.i-,r. w „ HUFin 
rd abb I apowti 



lurmubl 



s 


craft oi 


progra 
e desig 


EL" 


ei almost 


nmnhif-.s 



111. Dor.., j 



,on has to be given as to The emphasis or bias is (on- Digital Tracer from RD from whom in Spt 

;i this is the- way you damentally mathematical, Laboratories T,i.= ; '.s do:-,:- to an Graphics. Just how toe 

lower behint 
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zapping Your 
Graphics 



ZX looks at some utilities that can help 
put some life into your graphics displays 



White Lightning 



ir.vumirK, in 8ASIC ,ind le 

i|".:jr,, -,a;'l ','. , ..','. ., 
lit Forth lanynayp L i'id „ s 





fonb TWameV tha^bef " 


with Oasis' White Lightning, bux 


PICTURE LOCK 




OCS 'strongly urge' you to get 
There are two forms of com- 


von can net full benefH nf ihh 










1 II 








1 • ■% 1 1 








| 1 


machine code and BASIC and 




vc usad a> « ih their Ideal 


III 


has di::.i:|...v„,l..ine.: : l HMh.y less 




ftie-B vo b 'aw changes. 


l l 


i'uuii-al BASIC iv.ii. though 






II 1 1 


faster than BASIC, is slower 




Bl= els- Iv. bjl oabically this ap- 


II 1 






ip.-s-oi w ..vi-:>:>ed down, but 


II II 














Wv're Lightning. 


1 A ' 








1 — . 




ing While Lightning, a Sprire 


Lightning the" von will not get a 




A useful leature is AUTO- 


'i "■ "■''■ i r 


aiast 


1 dpro 


at (he demos -first, they mill con- 


want a slighly simpler program 


Mi hough this is not technically 


"■ d ■ 1 ■■ ' ictmst'Sa 


worth taking the time to learn to 




r specifically a rapines v,,, 


p ann.E-.ri e. |.>ii>;i(.ins I- BASIC 


work then LASER BASIC is 






White Lightning is a superb 


ideal. But be prepared to spend 


nd w dKtrKlrJSu'ita ifhere 9 


■ -w°idr!?5S 




BLAST 1 






Ocean 10, f 14.95. 




Despite f ■■ !,■!,. I-, .ii.,..:, 


Ito^^mVtoXgte 


Picture Logic 


Theadvertisingseemstobea 


BLAST is by far the best corn- 


programs'. *' ^"^^ " S ' 5r "" 


This is an attempt to Introduce 


!mi' : H-'!!i'''!n -he a^| B fs S n e Ve 'th 


worked perkily with ■:-. 




LOGO to children and adults. As ' 






Spectrum Laser 
Basic 


well as the program tape it con- ol course it does not work on the 
tains two hnukk'ts. one aimed at QLor£X81 but on .ill 4B K ui -i 
adults and the othsr aimed at sions of the Spectrum. It was an 


S5oY e 9lirr? 




children - probably aged from a 






Marketer! by Ocean but written 


amund 12. As an introduction 1 1 






preh°ensiv-'e package ime'ndedTo 


£m- ^ ri^if vf ' ieci i v on ' 


ompile any BASIC pmnr.inr. 


are not inl en: i,:'n'i '-',."' ,'.'...' ':M.".' 


§§&£" , ! ' '' 


^^T^iJSjjaSi n 


1 but 2 K of° the SpwtrunVs 


wi:h -,asi an,.--. .; .;.;! ,-|j|;, ',,. 


followed! Ill 


omprfe program's"!* only 2 K o° 


or *■*'(■? (a cisi ,:„.,[,,. nation that 




diagrams. The ;ilIl,-Iis- lui.-.k is 1 


B5? The answer Ihat OCS 






written in less detail but is easily c 


me up wilh was to urnusirf an 




operate from within BASIC. The 




tra TOOLKIT proqram. As a 




program has a lot in common 


ports 25 commands, vai.-.hi.-:, . 


olkit it is probably the most 


F24.95.' ■ 
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GRAPHICS 



Doing It With 
Style 






a oam Graphics Ka^ v 


Ho 










/TYLE 











quits well eieculeci. Especially as 

'Etch-a- which rjll.iivk-ru, i,. : r, ■,...■> ■ shapes things jp), 

Where Siyte really scores, in who find k 
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ZX G RA PHICS 



Light Screen 
Designer 



Part Nine: by Toni Baker 



w 



I 




ZX G RAPHICS 




personally iriink that 
INVERSE VIDEO m\\ 


his makes RIGHT to 
ana LEFT to 
DOWM to 




'• Willl'l. 


typeface. Bold type i 


produced from Emend 


edMode 


F RCA PL 
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ZX GRAPHICS 
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ZX GRAPHICS 



COMPETITION 



QL Matchpoint 
Competition 

we've got 20 copies of this ace game to 
serve up for QL owners ! 




The Perfect 

■I ^m ■ §■ »he Saga Emperor 1 ft 

Keyboard mm 

John Wase discusses how to customize 

your keyboard. padding along 




DECEMBER/JANUARY t! 







Right note, wrong 
key 



Secretarial 
scrutiny 



la before modification. IV 

:h, but reckoned they could [!■* rpylv 



the wrong place, thtv leu very teal 

infest ctamped up - Several cct T-j 

iffice plained that it felt cramued The cov 

Mone where one normals -<>s a ■. r; 



keys Irani Japan, huf mi 
e rows acove !he sona gremlin was by now 

'fa nil ihe end o' A though double-pole, ihe 
01.1 -o ncd 'v 'ha ' .-iva: the bottom of the tr 






lhfi^y.ori(J|m:lun.! I Fin.; 1 : 
Full of delight - lyes. 

keyboard for Ihe secretaries to 
pound. Pride becomes before a 

down. Whan I got down to it. 



ma, and a full st( 




DECEMBER/JAN JARV 1 1 



So, at last I had the thing 

ther. The DK' Ironies case 
liana! Cflrui-ig (Itii- 




: h. -UN '.. » ■ ■...in ■ Hi. ii ■!■!■■ ■ I 

by LMT), uses this principle, luck. Weeks ■- 
de-sperstiun, 



in ding all the 

'"''"'inn^modmedVoard*! ! a^gratftST^thfl help of a 

r pleased about that!. Keith Thomo'aione ol 

DK'Tronics. Armo'n Eletronics 

Wembley Hill Bond. 



tors, Keighley.and S 

Mead, Portland, Do 
1J7. 


:■,-,- -Ji.i.n 
set, DTB 


Literature 






and 1-1 Siriclan Usui. Aug 1984. 
pp29-31; oot 1984, p23; Dec 
1984, pp56, 57, 59; Jan 
1935, p25; Feb 1985, p47; 

pp39, 40.' 



SPECTRUM MUSIC I 



The TX7. a DX7 without 

to a DX7'and priced ;it i 69a. 
mas more feasible but none - 

thought it could be programmed 



Midi Control of 
the DX7 and TX7. 

we try a Spectrum MIDI package which 

makes DX7 programming easier, and 

TX7 editing possible. 



while ago. A UX/ was out m my 
price range, but I reasoned 1 
could link it to the S i ■-= i kny board 




raphrcally, both in bar graph 


four MIDI OUTs. To swep from 












run another MIDI program such 


,r,.pro<i'r,ini'ning of the DX/TX 




Although the voices supplied 


as EMR's Performer - a brilliant 


oices is well known for its com- 


switches. Expensive at E55 but 






lexity, this program should be 


cheaper than replacing damag- 






eceived with open arms by 






this is not often convenient. To 


hose who are still snuggling. 


come in useful for other MIDI 


access to about 60% of the 








machioe's capabilities. So, 1 






Yamaha say in their TX 


rang up Mike Beacher of Elec- 


32 moil'rai.jfriillv used sounds 




manual - "as the TX7 voices 


tromusic Research and neither 


and keep it in the DX/TX's altered, almost makes this task 




tie nor the programmer of their 


memory permanently. This is a 




no need to give details of pro- 


DX7 software knew whether it 








would function with the TX7, 


liddly. inquiring loading a bank r:h»ngeri the new information is 




although they couldn' t see why 


to the TX, retrieving the single 






not. The programs arrived and 1 


voices required back to the played so you can hear the ef- 




set about experimenting. 


Spectrum, saving onto tape one 


ect you have created. For DX7 






at a time untilall32 are ontape. owners this program will aid 




The programs 


Then by loading eachyoice back 
into the Spectrum, transferring 


xperienced or make it much 


bV Whatevefyour knowledge it 


Throughout this article 1 will be 


to the DX/TX and storing into 


'ss daunting in learn how to 




referring to the TX7 . For DX7 




rogram sounds. 




owners ALL the operations and 


the final compilation of the 32 














the same and work perfectly - 1 
managed to borrow a DX7 in 


2. Function Parameter Store, 
A fundamental difference 


FX7 specific 
problems 


PIUS . . . 


programs marketed by EMRare: 


between the TX7 and the DX7 is 




ZXC has managed to organise a 




that the TX7 provides a 


Jecause the TX7 does not have 


special offer in conjunction with 


1 . A voice and function library 








This consists of seven banks 




he MIDI IN to the controlling 


dividually, the Function Library, 


of 32 sounds. These are 


the DX7 has only one which 


eyboard, 1 had a problem in that 




transferred to and from the 


must be changed, if necessary, 




Editor programs cost £24.95 


DX/TX via the EMR MIDI inter 


when a new voice is used. This 


rogram 1 couldn't play the 






means thai this program is not 




total of £74.85 for all three. 


This was an immediate 


so essential to TX7 owners 




ZXC is able to offer its readers all 




especially as each function is 


lugging in of the 5 pin Din 


three programs for the bargain 






:ads Not good idea. 


price of just £49.95, reprasen- 


cassette interface fitted and. 


panel. However the easy to use 


1 got around it by purchasing 




although tape sound libraries 


menus plus the means of 


he Yamaha YME-E MIDI box. 


seel. . .£24.901! (EMR's own 


probably exist, 1 was unable to 


displaying all the information at 


mis allows two MIDI INs to be 




find any. 




witch routed to two banks of 




Now 1 had access to 224 


useful and greatly eased the 






alternative sounds. The sounds 
supplied are interesting, ranging 


A big bonus for DX7 owners 


• * Special Offer * * 


from the pure effects such as 


is the option to load one of the 


** Save £24.90 ** 


'birds' to some beautiful and 


bank of 32 function patches into 






told that they had been collected 


change of another MIDI instru- 


FelearcVTFtnc,?on Z UbrirTu 


mg we're offering Electromusic 
nction Editor, and Voice Editor all 


Europe, in themselves they area 


reprogram them manually. After 


together for the price of just C 
To order these programs, ju 
EMR Ltd, 14 Mount Close, 


9.90. 


valuable addition to the TX/DX. 


e atcVis e slm n to f the ,J TX'Dx'50 


fVickford, Essex, 


studio or home based then hav- 


that you can play it and get an 






ing the Spectrum connected 








in e 'memTry V i S ' , 'sVtis e facto'iy ,8 al 


your modification sounds like. 


Address 


a^barfk 3 takes around "twenty 


" This is the chief program for 
DX/TX owners in that is displays 














all the information clearly and 











BINARY AND HEX 



Binary and Hex 

The Arithmetic of Computing 

by 

Carol Brooksbank 



100,000 »5 - 500,000 + 

10.000*4= 40,000+ 128x1-128 + 

1 ,000 * 8 = 8,000 + 64 x 1 = 64 + 

100 x6 = 600 + 32 >1 = 32 + 

10x2= 20+ 16x1= 16 + 

TOTAL 546827 4x1= A + 



aboul II"! processes involved, 10 the only new factor is the TOTAL 255 

for f iqures can add 1 to 99 and You can then count on, untilyou " In binaty, just as in de 

get the right answer without a reach 9 again in the right hand Binary can Introduce as mar 

second thought about what column, when you repeat the asyouneedtoexpres 

they rliil. They just know how to process, sddmn I to the iefi col- In ;nrniry .jrithmetic, there are of any si^e. lakn il 

doit. But if you understand what umri and rel tgitw right one only 2 digits: andl .As before, number 1 2345, for ii 

is happening when you count in toO. you count in one column until binary, this is 

decimal, you are half way to you tun oul of digits, when you 



Decimal 099 two digits, » is possible to. 

In decimal arithmetic, there ere Mow, as before, you add 1 to the point in binary, 10, is not ten. It ly. 

10 digits which ate always used leftmost column and return all is one-oh binary. Ten is a name Imagine that you have a ba 

ting: and in order to avoid any conf u- equipped with a switch. If y 

099 sion, you should always think of switched the switches so tha 

1 2 3 4 5 6 7 S 9 100 the binary numbers as one-oh was represented by an inert w 

binary, one-one binary and so (switch offl, and 1 w 

Because of the need to use You can go on like this for as on. represented by a live w 

numbers higher than 9, a col long as you need. Euery timeyou You carry on counting in (switch on), you could exprt 

digits arranged in a vertical col- tg new between and 255 decin- 

cond column is brought in to the the left. In this way, any 11 3 Youcanthink of eachaddresE 

left of the first one, and this new number, as big or small as you 100 4 your computer's memory as 

DOlUtlinisaSaumedWhQldO.TQ wish, can bo expressed. 101 5 minute bank of B electric wii 

and the original one is returned 10 times the one on its right. 1000 8 



'img 



it the pattern represents the 
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BINARY AND HEX 







1036 256 
3 

4096.3 - 



Figure 1 ■ Binary, hex 


*,***» 


c«*»m«* 






BIN 001 1 




= 03h 


= 3d 




BIN0O0O 




- OOh 


<• Od 




BIN 001 10000 




= 30h 


= 48d 




BIN 001 1 

BIN 1001 




= 03h 
= 09h 


= 9d 




BIN0O1 1100! 




- 39h 


- 57d 




BIN 0011000000 


11000 


= 3039h 


= 12345d 





Clearly, I 
grammer. B 



/ other forn 



g system with only ti 



1 »15 = 
TOTAL 



10959 
the hi^h 



BINARY AND HEX 



2 x C - 18 
2iD = 1A 
2.E-IC 



9 + 3 = C (try not lo work in carry 1 . 
lei:iT;.ii»g + 3 = 12,convBrt 

noties -■ C.CounrmiLiMnhe. 3033 
-9 A BC. You may need help al 7FE3 


Figure* 

BIN DECIMAL HEX 

0000 

0001 1 1 

0010 2 2 

0011 3 3 
□100 4 4 
0101 E 5 

0111 7 7 

1000 3 8 

1001 9 9 

1011 11 B 

1100 12 C 

1101 13 D 

1110 14 E 

1111 15 F 



le multiplication tabli 
will start you off wr 



2 kI =2 

2 k2 = 4 

2 (3 = 6 

2 ,1 = B 

2 x5 = A 



Philips Data 
Recorder 



II trie added hassle of making si 



3ORI01-689-216' 




XCOMPUT1NG DECEMBER/JANUARY 19SS 



QUICKSORT 



Quicksort 



Desert Burner 
Creative sparks 
E2.50 



Nonterraqueous 

Mastertronic 

£1.99 



li}ttBMa:W«MK<l 










GRAPHICS # * * * 








ADDICTIVENESS * * * * 








OVERALL * * * * 








Action Biker 








Mastertronic 








E1.99 


GRAPHICS * * * * 








ADDICTIVENESS * * * 








OVERALL * * * * 


your planet. Options fo- vjnuus 

and keys OAPO qive 
upttuwn.left.iiqht movement. 
Space fires and I and U allow 






Supersam 


■ ; ^v' '■'"' 'Krl-" : Ji\ 


ftS^ ft" "rfpJchn^exi 


Budgie software 




window you have to ride around 


E2.50 


specific actions. The game is 


another session. 


the Spaceport. Control is LIP 






GRAPHICS * * * * 


DOWN'LEFT/RIGHT by keys 


is to explore the 34 rooms ol a 






AZNM plus space to enter a 




Would I buy it? Vesl 














Elusive Boris. This is corn- 


GRAPHICS * * * * * 


Chinese Patience 




ways which send you astray and 
poiholes which are fatal. Added 


ADDICT IV EN ESS * * * * 
OVERALL ***** 


Atlantis 
E1.99 


fame? This fe^a 'fairly "average 


to Ihis you have an energy level 


Cylu 

Firebird 




game which gave me a Few m- 


w mth drops °Jj e ™"'^ s ^ t s tl 


[imiimrTi E:c/ii!s which I still plav 


d'cs i r!:" it' oo hack to it again. I 


when completely depleted you 


E2.50 


on occasioned BO was plcasix 
to receive this program. Chinese 


whaTtheTlfk^ndmaTyoryou 
















simply suggest you try it oul at 










Options for joystick ortt 


^fanolheTmaze'Mind^coliect 


mB Theinst a r J ction S a "ake m L l pthe 


riidiVldoalotfotme. 












tb- tBr ' u w^tamtoso've'tte 




GRAPHICS * * * 


iz-^fi^sTSs 




ADDICTIVENESS # * 




complicated. However once 


OVERALL * * * 
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S CHANGE SPEED 



Speakeasy 

Kai Webber has come up with a machine Srsf; 

code routine that turns the Spectrum S'r-iiXw 

into a speech synthesiser. ,„ A m r. M iK 






"SPEAKWELL" 



with SAVE mode (r 



■alue- laws, the 



H - RECORD SPEECH 



K SPEECH 



nol do anything silly like feeding 

Spectrum! It also helps if you 
stress the words as you speak 



10 border a: paper 0: ink 7: c 

LEAR 32767: RESTORE 9920: GO SUB 
9830 

2B LET SPEED- l: LET START-3283 
5! LET LENOTH-32512 

30 OO SUB 9730 

40 RESTORE 97201 LET K*-INKEY» 

30 FOR F-l TO 7 

60 READ A«,LINE: IF A«-K* THEN 

GO SUB LINE: GO SUB 9810 

70 NEXT F 

80 60 TO 40 
9230 PRINT AT I7,0| FLASH 1|"L - 

LOAD S - SAVE R - RETURN': 
PAUSE is PAUSE 0S PRINT AT 17,0, 



INKEY*= 1 



THEN GO " 



92S0 INPUT -NAME OF FILE? « | NC 
9290 IF LEN N»>10 THEN PRINT AT 

17,71 FLASH II "INVALID FILE NAN 
F-: GO TO 9280 
9300 PRINT AT 17,0,, AT 17,111 FL 

ASH 1| 'LOADING ■: LOAD N*CODE 

9310 RETURN 

9320 INPUT "NAME OF FILE? "IN* 

9330 IF LEN N*>10 OR N*=- » THEN 

PRINT AT 17,101 FLASH lflNVALI 
D NANE": GO TO 9320 
9340 PRINT AT 17,0,,: SAVE N'BCOT! 
E START, LENGTH 
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9350 PRINT / 



r 17, 10; FLASH t| ■> 
PAUSE 0: GO SUB 91 
■■n" THEN RETURN 



9360 PRINT AT 17,10! FLASH 1)"VE 


96R0 PRINT 


AT 17, 0| FL 


USH 1|"PRE 


RIFYING..-: VERIFY N*CODE 


SS ANY KEY 


TO START RECORDING": 


9370 RETURN 


PAUSE l: PAUSE 0: PRIN 


I AT 17,0, 


93B0 INPUT "ADDRESS TO COPY FROM 


,AT 17, Hi 


FLASH li -RECORDING" 


? -;hl 


9690 OUT 234,15: RANDOMIZE USR 3 


9383 PRINT AT 17,0, , 








9390 IF HL<32855 OR HL>65366 THE 


9700 BEEP 


.3 




N PRINT AT 17, 6i FLASH lJ-INUAL 


9710 RETURN 




ID COPY ADDRESS*: GO TO 9380 


97 20 DATA 






9400 INPUT "ADDRESS TO COPY TO? 






"IDE 


-f,9Z30 






9403 PRINT AT 17,0,, 


9730 PRINT 


TAB Hi -SPEAKUELL- 


9410 IF DE<32855 OR DE>65366 THE 


9740 PRINT 










N PRINT AT 17,2! FLASH li'INVAL 


9750 PRINT 


'TAB 61 "R - 


RECORD SP 


ID DESTINATION ADDRESS': GO TO 9 








400 


9 760 PRINT 


"TAB 6! -P - 


PLAY BACK 


9420 INPUT -NUMBER OF BYTES TO C 


SPEECH- 






OPY? "|SC 


9770 PRINT 


'TAB 6i -A - 


ALTER STA 


9430 IF BC+DE>63367 OR BC*HL>633 


RT ADDR- 






67 THEN PRINT AT 17, 9| FLASH 11 


9780 PRINT 


'TAB 61 "L - 


CHANGE LE 


•INVALID NUMBER": GO TO 9420 


NGTH' 






9440 POKE 65921, DE- 236* I NT (DE/2 


9790 PRINT 


'TAB 61 'S - 


CHANGE SP 


56): PDKE 65522, INT (DE/256) 


EED" 






9450 POKE 65524, BC-256*INT (BC/2 


9800 PRINT 


'TAB 6! 'M - 


MEMORY MA 


56): POKE 63525, INT (BC/256) 


NAGER-' 'TA 


6t"T - TAPE OPERATIO 


9460 POKE 63527, HL-256*INT <HL/2 








561 : POKE 63528, INT (HL/2561 


9810 PRINT 


AT 19,0! -ST 


RT ADDR 


9480 IF BC=0 THEN RETURN 
9490 RANDOMIZE USR 65520 


F SPEECH D 
9820 PRINT 


■END ADDRESS OF SPEEC 



32854 



65531 



9590 POKE 32852, LENGTH -256* I NT t 

IFNGTH/2361: POKE 32B53,INT ILEN 

GTH/2561 

9600 RETURN 

9610 INPUT -NEW START ADDRESS? 

■i START 

9620 IF STARTC32B55 OR START>653 

60 OR START+LENGTH>65367 THEN P 

RINT AT 17,8| FLASH l;-INVALID A 

9640 POKE 32830, ST ART -256* I NT (S 
TART/236): POKE 32B31 , INT (START 



9830 print 'length of speech dat 
a:-|LENgthi- -|«hat <i,h;-rec 
ord/play speed: -ispeed1 ■ 

RETURN 
9850 FOR F=3276B TO 
9860 READ A: POKE F 
9870 NEXT F 
9890 FOR F=65520 TO 
9900 READ A: POKE F 

9910 NEXT f: return 

9920 DATA 243,42,82, 

4,128,6,8, 14,0,237 

9930 DATA 67,0,0,175,219,254,23, 

23,203, 17,16,247,113,38 

9940 DATA 86, 12B, 71 , 16, 254, 35, 12 

201,243,42 
9950 DATA 82,128,237,91,84,128,6 
, 8 , 78 , 203 , 9 , 203 , 9 , 203 , 9 
9960 DATA 121,230,16,211,254,203 
, 1, 16,247,58,86, 128,71, 16,254 
9970 DATA 203,133,35,122,179,27, 
32,224,251,201,87, 128,0, 127,1 
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ASSEMBLE 


LISTING 


11) ; 


RECORD MODE 




20 


ORG 


3,2768 




JO 


DI 




disable maskable interrupt 


40 


LD 


HL,( START) 


;STAKT ADDRESS OF DATA INTO HL 


50 


LD 


DE, (LENGTH) 


DATA LENGTH INTO DE 


6 LOOP L 


B,B 


,B CONTROLS LOOP OF 8 BITS/ 1 BYTE 


70 


LD 


CO 


C COUNTS NO. OF BITS AT EAR PORT 


80 


LD 


(0),BC 


TIME WASTING INSTRUCTION 


91) LOOP 2 XQR 


A 


CLEAR A AND CARRY FLAG 


100 


IN 


A, (254) 


READ PORT 254 


1 10 


RLA 




VALUE AT EAR PORT. . . 


1 20 


RLA 




ROTATED . . . 


130 


RL 


C 


INTO REGISTER C 


140 


DJMZ 


LOOP 2 


GET 8 BITS FROM EAR PORT INTO C 


150 


LD 


Chl),c 


STORE THE 8 BITS IN (HL) 


160 


LD 


A, (SPEED) 


RECORD/PLAY SPEED INTO A 


170 


LD 




USE B TO CONTROL THE LOOP 


180 WAI 


DJNZ 


WAIT 


WAIT A SHORT WHILE 


190 


INC 


HL 


NEXT LOCATION FOR NEXT 8 BITS 


200 


LD 


A,D 


CHECK WHETHER OR NOT. . . 


210 


OR 


E 


TO FETCH ANOTHER 8 BITS 


220 


DEC 


DE 


DECREMENT THE COUNT 


230 


JR 


NZ.LOOP 


LOOP IF COUNT NOT ZERO 


24 


EI 




RE-ENABLE THE MASKABLE INTERRUPT... 


250 
260 


RET 




FOR RETURN TO BASIC 


280 ; 


PLAYBACK 




290 


Dl 






300 


LD 


HL, (START) 




310 


LD 


DE, (LENGTH) 




320 P LOOP LD 


B,8 


B CONTROLS LOOP OF 8 JITS/1 BYTE 


330 


LD 


C , ( HL ) 


GET DATA BYTE TO BE PLAYED 


340 


RRC 


C 


GET THE BITS IN THE RIGHT ORDER 


350 


RRC 


c 




360 


RRC 


C 




370 P LP 2 LD 


A,C 


GET THE DATA BYTE INTO A 


380 


AND 


1000 10000 


MASK THE ONLY REQUIRED BIT 


390 


OUT 


(254), A 


OUTPUT THIS BIT TO THE SPEAKER 


400 


RLC 


c 


GET NEXT BIT INTO REQUIRED POSITION 


410 


DJNZ 


P LP 2 


OUTPUT 8 BITS ( 1 BYTE) 


4 20 


LD 


A, (SPEED) 


SPEED INTO A 


4 30 


LD 


B,A 


TRANSFER TO B FOR PAUSE 


440 PAUSE DJNZ 


PAUSE 


WAIT A SHORT WHILE 


4 50 


RES 


0,A 


ANOTHER TIME WASTING INSTRUCTION 


460 


INC 


HL 


INCREMENT DATA ADDRESS 


^70 


LD 


A,D 


CHECK TO SEE IF COUNT IS ZERO YET 


480 


OR 


E 




490 


DEC 


DE 


DECREASE THE COUNT BY 1 


500 


JR 


NZ,P_LO0P 


LOOP IF COUNT NOT ZERO 


510 


EI 




RE-ENABLE MASKABLE INTERRUPT... 


520 


RET 




FOR RETURN TO BASIC 


530 START DEFW 


32855 


START ADDRESS OF SPEECH DATA 


54 LENGTH DEFW 


32512" 


LENGTH OF SPEECH DATA 


5 SO SPEE 


D DEFB 


1 


RECORD/PLAY SPEED 
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i be realistic (allowing some SCOOp 

; a | c a nd" f^TeTdd Sentient Software 

rsion and obligatory nwes, £2.99 



X Computing 






the streets (or the h-oi 



.:i»|. :■■:!- y 
s Fjiihnyr 



nef u I). 



donW1R3AB. uery good in places, such as frotnth 

Now on wiLli the aboard the Cutty Sarli, new ihe task an 

reviews. . . . beginning, while the majority of The game begins with the cHohetf, and nondescript adven- 

average. Some of the locations alarm. Sound features Quite descriptions, d^yoid ot ,it 

London Adventure ;^^ a p ^ r a \ ° m b a e n Th ^ e ,°^ °^ a ' n ol X anrTca^^in'eT mD5phBre and lacW '" a co101 "' 

FridaVSOft you^aTfind^ecinnd clues" i'wi"'''.-; itting"^ telephone London Adventure, Fridsysoft. 

£4.95 On thi-J point II is wis« to colled which rinys. pifiv.i : | you vvil- U'Mf- II:,: Mailings, SlBtiOtTRft. 

The first of this selection of unlikely, as ii will no doubt be forward in the game. You 

Quilled games is Fridaysuft's useful at some point. awake, right at the start, to be Scoop end The Amulet, Sentient 

" '■ "16 The game has quite a few faced by a morning 



i thre< 






hich t 



Software, Brai 

S ranch Rd, 

LS12 3AQ. 



we, the jury 




Fighting Warrior 
Melbourne House 
E7.95 




flghtinci programs lately, not the 
lea si SifM-ig MH's WAY OF THE 
EXPLODING FIST, but now they 


a^'o^atwokwhiohyoumos 


type to produce this game. 
In Fighting Warrior your task 


game to play as you are under 


aside, there Is nothing gluey 


get very far into the gameplay 
the superb graphics and adven- 


quickly indeed. Your character 

and every lew feet it seems en- 
Fighting is done by sword and by 


GRAPHICS * * * * * 
ADDICTIVENESS 

* * * * * 
OVERALL * # * * * 



Daley Thompson's 
Supertest 


SSSEii 


flGHTMlG ( 


£6.95 


PISTOL SHOOTING, move cur- 


W'A? 


bujkv* , 


The very title of this one is 

'■ii.jLiLjIi !i> siniilihe most robust 


CYCLING, L/R as fast as possi- 




PMM 


Yap, its another lefM.ght-as- 
fast-as-you-can tesi uf linger or 

this type of game at first but 


SPRING BOARD DIVING, 3 
bounces and L/R for somer- 

GIANT SLALOM, steer L/R 

through the flags as they scroll 

ROWING, L/R as fast as you 


"? 


pi 


OuX r rn U d%eairsm S oTt'he 


PENALTIES, L/R for speed, line 
up on football, fire to shoot. 
SKI JUMP, L/R for speed, fire to 






have Ocean done? Well I'm sure 


TUG O'WAR, L/R for power. 




*^\_ / 


owners of DT's Decathlon 


Each Dne needs slightly dif- 






graphics are just as good if not 

better then before and Ocean 


and 1 personally enjoyed the. 


^J 






tug war and diving gave me a 






h a v B e "o !tl y^hl n/ r i fh wnd 


GRAPHICS * * * * * 
ADDICTIVENESS * * * * 
OVERALL ***** 




^r 1 M 


62 
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tft 




ynh,:!;,!,:! : 



j, in reality 

jxity. The game comes MOtltV OH The RllH SX«Z wl 

Gremlin Graphics Bounty Bob strikes t>m them h also the 

Es - 95 sack * j"g" gXtaTiT fwi 

B e of whioh is an overlay . US COW pie matter although to gel t 

.lie old type Spectrums Anomer in me iviuiny iwuiis nmiirHalrltlaDJannftrafe 

h shows which keys per- series h this Hi-in.a he^has to t/.»3 qUJredat" -"■----- — *" 

lflfiEf Bre^s'acttons which many devious and delightful I'm afraid we only got a review into two 

!,EE§H3 iHJpSs|p |SES\Hs SHskiSiii 






cally, and the 



} of r 

i take wit 






appe 



s that 



placed on the playi™ ,-ti 






n;s .:;hdr:]e from Once designee 

for Li such I time (listed you can sau 
m-, Villed ty your to tape, you can eu 



and objects of which th 


saulting j 


rnpa - 






































'swear' keyl. 


















quiMiliilicult. personally Ifoun 




"f rtH 



GRAPHICS * * * * 

GRAPHICS ### ADDICTIVENESS 

ADDICTIVENESS * * 

# * # 



GRAPHICS * * * * 

# * * # ADDICTIVENESS 
'* * * * * ADDICT JVENESS * * * » * * * * , 

# # * # OVERALL * * * OVERALL # * # * I 




save the Eai 
an alien race 
iking plenty John Marsh 



t wiM dy" 



and though I enjoi 



couple oi shorted loadings as I help todefend the Earth, 

[nought the piograru had crash- The Basic style of animation ned trilogy ul gjimrjs. and if ih.i; 

eo if a block is not loading then is much the same as Gargoyle's gamn is any.hinq to go hy I'll hi 

Ipavei n. it is ptobaliiy simply not earlier yanii-B. 1 1'. it th's i in 10 fit looking forward :i> nit.' rcjt oi Ihi 



GRAPHICS * * * * 

ADDICTIVE NESS * * * * 
OVERALL * * * * * 



GRAPHICS * * * * * 

ADDICTIVENESS GRAPHICS * * * * 

* * * * * ADDICTIV! M, :>■■-, 

***** OVERALL * * * * 



Sparkler's Special 
creative sparks 
£7.95 








muc 


uf t uu:i'e here. The pro- 


this without spoi 


Tower of Evil we 










runner to AticAtac in' 
















i;i(,-fi siroighi out of the 














sSr 


1:1 V ■■■'■ 


Oppl 


selves. There is very ,itie 


perience this in re 




s 10 be 


ml 


jn ibII. nolliing ol Hie sort 


determine what is 


unplayable, since, try 


si might. 


















lo jump successfully 
horse onto the stage 
order to try and cc 


le°cT h |h' n 


Adr 


'of'nskil'n' decisions for 


Consequently 


routt 8 " 98 " 5 d °" ed S 


ong the 


The 


™uble isThat this teBton 


without giving it 












"tem^to'eoltecr" 




£ 


I'.siMiir. ioNilis. P:i-i..l'-,.| 


ta™k h is Ve WhaM r c 






/the 


aiithcr'' i ano you simply 


Hacker is that it w 



path through it. 
The Orrery initially rjiv-.'a a 
w of the sun ami pirns the or- 



ding great chunks of bluest 



GRAPHICS # # # GRAPHICS * # # 

ADDICTIVENESS * * ADDICTIVENESS * # 

OVERALL * * * OVERALL * * 



words: 'Log On Please', and 
from here on it's uptoyau. If you 
succeed in logging on you'll get 


aackwards and forwards in time 

;omet, or to speed up/slow 
down the passage of the comet 


This is not a game that's like- 
probably the best thing to come 


Obviously an astronomy pro- 
jrum like this will appeal only to 

■>ut after ail, Halley's Cometonly' 


GRAPHICS * * * 
OVERALL * * # * 


so, if you're interested why not 

Walk, Tyne and Wea'rNE31 2LT 
0632 B32S25I. 
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The Sound Of 
Music zzr 

John Ainslo presents Interface I owners ' nterBreter 

with some new sound commands for "Si™",'; 

controlling a Programmable Sound rs,",™,!" 

Generator. i.TSSU77: 



alised with one RAND 



3ames, as it only has 3 
le single channel BEEP 

, though by machine 



irstlythe also fa. I, ihe pracc 






easily. Register selection and pis can be used to create any at 232735 and 23736 

data transfers ate both d(>rwa command reciui't-ii Secondly. sdnjiscs normally point 

the data lines and I". ■■:!.:-,>-..: is d.;s:npU-,n with e>.ism|jl*s. mi 1 FOH but can ba re- directed 

"--- BDIR commands to try to manmiSH checks tan bri iiiVrji-mnd, a 

disto ! heir usefulness. then returned to QIFOh if . 

both quired thus allowing the ad 



!!ui!n>.h t !sinpl*sr !»'<'■■ (-ma^ne OUT 22 3, V will rs.-msicr d,-.:o V 

from the loudspeaker. to that register. The WR. IORO. 

A variety of sounds which A6 and A1 are decoded to give 

can be incor| ltl r;)i,-:l into games BDIF and BC1 . IN 221 can be 



ivi. I be transparent done. For example PRINT* 
three new com- prefer checking for token 245 



Spectrum's bleeper. can a 



generator which can be mixed 

be set independently to any one 
of fifteen values. The envelope 
generatot amplitude modulates 
the outputs and can be set for 
fast or slaw decay or attack. 



BASIC. 










m 


n,.i 












,1, 


* 


•c 




,.« 


of* 


line 


NOTES 


2 4 7 9 11 


2 4 7 3 11 






c* 


D. 
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Q" 


.. 






c. 


0. 
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« 


.. 
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E 


f 


l.l. 




H 


E 
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*l 
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1 3 5 6 B 10 12 


13 5GB 
SCALE 


12 
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■.f-rirnyrarn T"l>: syntax nsc-i: 



,1 Spectrum coi 



Software Notes 



lime EXPT 1 
STFNDisi.,jl 



I-.S--I-1— ■=::! 7 
peO-7 



hecked by use of GETCH », ,inn ■".jise- chan—ls sfl l*r: 

lid' the' *'andNXTCHtoad- * MUSIC or *SOUI 

Bnceoastft.ERR6pointB1orh8 (Joes, however, select thi 

I'.'iii'.ii' ..Utlrcss in (he BASIC envelope shape and perim 

. .K-i /.hi, I-, .,■,., „-,ii i<:eoli:(i irj mlik:h Lire common -o al! chji- 

iiul'..|o l"-T- '-,..■'.'.' riuitiiiB.ChADD in::-, i lift- ore lhr..'r:- r,ni« chrtii 

r;ir; 1 ,::> ! !ririi., 1 ,r:irl.,| spaces. D,:r I'l-ciuyli -A-hic 1 - nr.w s out™ 

■■I lunnrro EXPT1 puts the in- from IN- miiuI--' 'oise nen.-niu;' 



lulstor in Ihe case of B bit tation tan bring out the 

r;. aiiflrr-(rir!UK[lljvFINT2 capnb-lidus of the general 

H in the BC register pair in TONE CHANNEL selects eit 

ogremming choice which binaiion of the three where 



■N 



•NT 




ri-.sMOISF CHAMC. ■>■ 



i mat chairui it 



ROUTINE 


VALUE 


FUNCTION 


GETCH 


001 Bh 


Gets character from basic into A. 


NXTCH 


0020h 






0074h 




ERR6 


OlFOh 




STEND 


05B7h 




END! 






EXPT1 


1CB2h 


on sunk 1 iil-iyl 


FINT1 


1E94h 


A. 


PINT 2 


1E99h 


Puts two byte integer from shack in 
BC. 


STAKA 


2D2Bh 


Puts A on stack. 


STORE 


5BF0h 


Eight byte temporary store. 


TABLE OF VARIABLE AND THEIR FUNCTIONS 



10BFIV play demo 
ro mPJT "erweloi 
?j NPUT "du ratio 
30 *SOUND 1,21 
40 *PLAY 1,0, e, 
50 PRINT AT 10,2 

55 PAUSE 

60CLS 

70 GOTO 10 

* MUSIC 



DECEMBER/JANUARY 1 



SOUNDS 




T1 ^,; l ,;"i,' 1 ; 1, 



specified VOLUME. The com- 




mand is fairly comple* and, to 


30 * MUSIC 1,o,n r 5 




40 PAUSE 20 




50 NEXT n 




60 NEXT o 




70 *PLAY 0.0.0, 0:REM turn 




channels off 


ween each. The CHANNEL 




selection is prettv strsightfor 


*SOUND 


is required. OCTAVE starts at 


volume ' ■ P ■ 


two below middle C and in- 










pitch 0-85335 
volume 0-1 5 


within the chromatic scale and is 


the same as the Spectrum's 






*MUSIC, since its output is 






amplitude of [he output ranges 




























■MUSIC musl be used with 


















channels the single noise 


5 *PLAY 1.0,0,0 




10F0RD-0TO6 


PITCH is no more than a division 
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HEX DISASSEMBLY OF 


*COMMfirJDS 


FB18 


B7 


05 


07 


94 


FBFIC 


2C 


C2 


F0 01 
















F81C 


IE 


FE 


IS 


30 


FBB0 


07 


20 


90 D7 


FA00 


01 


09 


Ffl 


eo 


FRBC 


01 87 21 27 


FB20 


35 


fi7 


20 02 


F8B4 


82 


IC 


CD B7 


FFI04 


43 


B7 


3C 


C9 


FR90 


FR 06 00 4F 


F824 


C6 


10 


32 


Fl 


FBB8 


03 


D7 


99 IE 


FFI08 


07 


16 


ae 


FE 


FR94 


09 7E 23 46 


FB2B 


58 


07 


99 


IE 


FBBC 


79 


32 


Fl SB 


FA0C 


2A 


C2 F0 


01 


FR98 


4F ED 43 F3 


FB2C 


79 


32 


F3 3B 


FBC0 


78 


32 


F3 55 


FFI10 


07 


20 


09 


C8 


FA9C 


SB 07 94 IE 


FB30 


78 


32 F3 5B 


FBC4 


3E 


0B 


32 F0 


FA14 


EF 


FE 60 CR 


FRRB 


FE 07 30 48 


FB34 


D7 


94 


IE FE 


FBC8 


SB 


3C 


32 F2 


FA18 


3F 


Ffl 


FE 


73 


FRR4 


3C ED 4B F4 


FB38 


07 


30 


IB 


R7 


FBCC 


38 


07 


94 IE 


FFIIC 


CR 


EF 


FR 


FE 


FRR8 


5B 47 3A F3 


FB3C 


28 


18 


F3 


FS 


FBD0 


FE 


09 


3d 47 


FR20 


70 


Cfl 


83 


FB 


FRflC 


58 IB 07 CB 


FB40 


FE 


04 


30 


13 


FBD4 


A7 


28 


02 C6 


FR24 


C3 


F0 


01 


Fl 


FRB0 


19 CB B9 CB 


F844 


CS 


07 


32 


F0 


FB08 


07 


32 


F5 SB 


FR28 


06 


9E 


36 


30 


Ffl.84 


IF R7 10 F? 


F848 


SB 


Fl 


06 


01 


FBOC 


3E 


00 


32 F4 


FA2C 


ee 


D7 


85 


83 


FRB8 


32 F3 5B 79 


FB4C 


97 


32 


F2 


SB 


FBE0 


SB 


3E 


37 32 


FA30 


03 


34 


03 


E9 


FRBC 


32 F3 38 D7 


FB50 


3C 


32 


F4 


5B 


FBE4 


F6 


SB 


07 94 


FR34 


04 


R2 


04 


£0 


FACe 


94 IE FE 04 


FB34 


18 


IB 


07 


F9 


FBE8 


IE 


FF 


08 30 


FR38 


04 


20 


04 


E6 


FAC4 


30 26 R7 28 


FB38 


24 


C6 


04 


32 


FBEC 


2E 


CB 


27 CB 


FR3C 


03 


RE 


03 


07 


FAC8 


23 F3 CS 07 


FB3C 


F0 


SB 


Fl 


3E 


FBF0 


27 


CB 


27 32 


FR40 


74 


00 


FE 


20 


FACC 


32 F0 SB Fl 


FB60 


06 


32 


F2 


SB 


FBF4 


F7 


38 


D7 94 


FR44 


28 


08 


FE 


3fl 


FRD0 


06 01 B7 32 


FB64 


32 


F4 


513 


3A 


FBF8 


IE 


FE 


08 30 


FR48 


28 


04 


FE 


0D 


Ffl04 


F2 SB 3C 32 


FB68 


F3 


SB 


32 


F3 


FBFC 


IE 


21 


F7 58 


FR4C 


20 


Fl 


07 


82 


FADS 


F4 58 86 93 


FB6C 


3B 


FE 


20 


30 


FC00 


B6 


2F 


32 F7 


FA30 


1C 


FE 


2C 


C2 


FAOC 


21 F0 5B 7E 


FB70 


E5 


06 


03 


21 


FC04 


SB 


FE 


FF 28 


FA34 


F0 01 


D7 


20 


FRE9 


03 DO 23 7E 


FB7<s 


F0 5B 7E 03 


FC08 


13 


06 


04 21 


FR58 


00 


07 


85 


1C 


FRE4 


D3 DF 23 10 


FB78 


00 


23 


7E 


03 


FC0C 


F0 


3B 


7E D3 


FR5C 


Ft 


2C 


C2 


F0 


FAE8 


F6 C3 CI 05 


F87C 


DP 


23 


10 


F6 


FC10 


00 


23 


7E D3 


FRS0 


01 


D7 


20 


00 


FAEC 


07 F9 24 D7 


FB30 


C3 


CI 


03 


07 


FC14 


OF 


23 


10 F6 


FRS4 


D7 


82 


1C 


FE 


FRF0 


74 00 FE 20 


FB84 


74 


00 


FE 


20 


FC18 


C3 


CI 


05 D7 


FR69 


2C 


07 


20 


00 


FAF4 


28 08 FE 3R 


FB8S 


28 


08 


FE 


3A 


FC1C 


F9 


24 


RF 32 


FR6C 


D7 


82 


1C 


CO 


FRF8 


28 04 FE 00 


FB8C 


28 


04 


FE 


00 


FC20 


F0 


5B 


32 Fl 


FR70 


B7 


05 


07 


94 


FRFC 


20 Fl D7 82 


FB90 


20 


Fl 


07 


82 


FC24 


SB 


06 


0E 21 


FR74 


IE 


FE 


13 


30 


FB00 


1C FE 2C C2 


FB94 


IC 


FE 


2C 


C2 


FC28 


Ffl 


38 


7F 03 


FR78 


73 


(17 


26 


02 


FB04 


F8 01 D7 20 


FB98 


F0 


01 


D7 


20 


FC2C 


DD 


34 


23 7E 


FR7C 


C6 


10 


32 


Fl 


FB08 


0B D7 82 1C 


F89C 


00 


07 


82 


IC 


FC30 


03 OF 


10 F3 


FR80 


SB 


07 


94 


IE 


F80C 


FE 2C C2 F0 


FBA0 


FE 


2C 


C2 


F0 


FC34 


3E 


07 


03 OD 


FR84 


FE 


3D 


30 


64 


FBI0 


01 07 20 00 


FBA4 


01 


D7 


20 


00 


FC38 


3E FF D3 DF 


FR88 


A7 


28 


61 


06 


F614 


07 82 iC CD 


FBA8 


07 82 


IC 


FE 


FC3C 


C3 


CI 


05 00 



* SOUND must ft 
(Nil ihe appropriaie si 
ie *PLAY to en 
sleeted channel and 
ff by ' PLAY ,0 ,0 .Q 



1DHLM sound demo 

15 *PLAY 1,0,0,0 

20FDRp = 1 T0 500STEP1 

30 *SOUND 1,B*p,5 

40 PAUSE 1 

50 *SOUND 1,4 *p,5 

60 PAUSE 10 



65 *SOUND 1.12 * 
67 PAUSE 10 
70 NEXT p 

80 * PLAY 0,0,0.0 
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Lines from a parent who gets left 
behind. By David Stewart. 



our telly screens ing us up in She middle oi -ha yc ■ thai they began to READ 'Oh v«s" i"ev sighed "fou 

ting us to part with night an- steading uvitn us on their :iOQKS. That's right, a can bonc-iv boots there, can't 

KJ cash in order to bended kneus to tfl*8 them - qood old cover to cover, you?' 

drenched beaches search ol lit* i-en day o' i ::u-k :. ■■■■ pi>: is book. Real old fashion- I woi :- lr.-:i.«ii se I yw 

jas? Most o[ our eoolcornenvlheSpecUumand "J PAPER and INK. many othei wonte. noncapts 

III haunted by the a program ui two, but we re- And, when they finished the and expressions in ttiia great 

f the last Great mained adamant. lirst, they asked to be allowed to language el oursets buried thai 

time last year and 'Look, see that? It's the sun. It and another and we couldn't patiences of today's young 

we took the two gives us daylight. Ri.in'fi'iih^i iiop ih-em They look to Liooks 'ini.iii sddk-is' It's a though I fur 

shone every day, tried hard. With the most ex- hangovers. It was costing us a reminds me, thanks to all of you 

mes were hardly traordinary results. . . fortune in foreign I urrency Bnd who have Written and told me 

I litlle fingers on a of them to ease the pain in those bookshop, _ behind w hen it comes to their of- 
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Norwood's 
Hypothesis 




:X COMPUTING DECEMBER/JANUARY 1 « 



Political and 
Military Simulation 
Games 
Interface 

£7.95 



How to Write 
ZX Spectrum 
and Spectrum + 
Games 
Programs 



teresting (d play, b 


jt nothing 


ffiwSt? 


Crisis, where tlie sin 


ries'togTe 




In general ihe boo 

BASIC, and who w 
out of their comp 


§?Sss 


AtE2.50 



'.' HOW TO . book as hfii.it, fi,-r",'..,.. iv 

BC (, Babani BOOkS beneficial to anyone. Why 

■am This book is the one thai is con- "iver Nile Scene In a name? Just 

lies trsry to my point in the first ano, her way of filling out a 

Ihe paragraphs, claiming thai Ihe cna Pi Hr ' 

inB L?uaT gameV n p%g S |'amra'ny Data Management 

« m °u- t ■*« ,.<■ at work 

are Jnri Pan Books 

,nly grams book - < M-ph V ,,.,i £2.95 



ireofaYES/NOquestion? 
st of programming know- 






..rtiSyriihijISnihniidB.blii 
■i'i-:it:i Dunlilu Duldiil you 



^COMPUTING DECEMBER JANUARY IS 



Siieiii ,ir,d whfn vr'n r./ach To]-" possibl 



is 'Sonic Foio CeiilNi 1 ' 
si"l software iind GASP! 



2. Type in LOAD"prograrr 




kcyU-j:r.:'| S for£10l). 






In the north of England tr 


you are sure the tape will be 










and a really good budget soft 


(self. SLOWLY increase the 




ware stall in Chesterfield's Fr 


volume until the characteristic 


Beyond the pale 


day open-market. 






1 mould be very grateful if yo 


15 the lowest possible setting. 










helpsupport the best value com 


3 . Rewind the tape and LOAD as 










Yours faithfully, 






Simon Godfrey, London' 


1 . It the LOAD fails, increase the 


any damage caused should any 




volume very slightly, rewind the 


fdmila3^r' a th B b^ve f ry S 'a e nd 




5 BE PATIENT. Don't try to 


of"the 9 S l F Sc' n Against 11 airt b he r 




hurry things up by incrGasmym, 
volume in lirtle |umps. By doing 
this the optimum setting may be 






5. Once a successful LOAD has 


sbns 3 wT/^aZX 














particular program it may help to 








edanyZXHl ',rps If xr s aiona 










.audspHaker. Stop at a position 


have fainted out of admiration 


(There now follows a shot 


and start LOADing from there. In 


beyond the call of duty, then this 


b™no folrth apology' 'due* to ' 


BaiSnfeni belni "' ^rf d"" 


™9 hI Ju5t do the trick. 


shortage of supply.) 


_*. 


1 will let him tell you exactly 


or around Sheffield (hen you mi 










to listen to any more of my drivel 


own programs. Here are a few 
tips from Jon Rose to help you 



lil POKE 16514,- 
16515,118 

(iit You might also li 



/our REM 
8: POKE 



of ZX81 soliwan 



to tell you how great 1 












i 'Cab- 


theZKBI however 




bog»H d An:i'. r i . . : v 
























can be applied lor-wcr 




ZX CHATTERBOX 


















-nent, 1 found a con- 


1. NEVER, MEVER use 


RND if 


Bristol 


















?,d Arm !"""', 


■i»r ransom -„<:.,,,,., h- a 
PEEK 16434. This 


Is" the 





i Tot POKEd i 





ourt Road s 


II-. lop. 


RND 


ould only give 




M 




E1.99. B 


''b'v-U 


withou 


repe.it.on. 




\$ 


















99. To 


forthre 


e, NOTPIforzer 






chtrtis 


hop, go do w 




PI- PI. 


Use CODE w 


erever 






OL 



into The Archive 

The QL's flexible database: by David 
Nowotnik 



to pull together the 





supplied free with 




ata base program, 'A 








id. ForwhilelheQL 


rhn 




the 


op end o( the hom 



ase application, a r 

wa'reTfhYy tave "available "for trf atSwTwira" The Sunshine is Bllown ir >'9' 2 ■ El " 

sale k> individuals or companes. Pubi ■ . ..i i i .: ■ ■ n h v AlisurnvVil.-illnii-. '"■ '"ore relevant to If 

a 'run-lime' version of Ardiivr: Vaiev ■ ■; 'O.nll. Eusd. Ar- Program™' < ■ 

lection of Arclisve ■ . II I ■■- ie of a ing the by:,, e ,r.. 



in biiddinn 
■.- „-. rlssirjn- 



s for i 



progrs 



supplied to all buyers of the QL nu~d 
upgraded and improved 'V2.0', FtAIV 



ase of a name and addre; 

n address or telep 
umber, using an address 






on SuperBasic. easier to use than BASIC, and inguloojw 



to develop their own suite of 
tion program. Fortunately, (here 



language, tor use with Archive 
While neither Sincla.r 3.>;cjr;.h 
nor Psion have any nmedtete 



copyright limitat 
ed other softwan 



/. 






INITIALISE 






\ m 






'/ ■ 


^N 


INSERT Y 


SEARCH-FILE J CHANGE 


k 


Figure 


: Schematic la 


, //, 


w 


ALTER 


REMOVE 


out of the address program 





DECEMBEHMANUARy 



"" 



PL 



Diephnrifi lujitihar, and space to 
1st birthdays. This tile a 'ii«s up 



2. Search tor one or mi 
records 









Figure 2 Address program listing 




proc change 








print at lOjlt 1 'Delete or modi 


y? (d/m)" 


let t*="a" 




while not It* 1" or t*="m") 








endwhile 




find a* 
















if tJ="d":reraave: endi f 




if t*»"m"l alter : endif 








































surnamef 












town* 




















name2* 








names* 




birthday!* 
















let s=0 




while 9=0 








print at S,S} U 1. Enter new r 




print at 7,3j"2. Search file 




print at 9,S("3. Delete/modi 




print at U,3( u 4, Exit file" 




print at 13,24; "SELECT 1,2,3 


OR 4" 






if h-Ii insert : endif 




if B=2D5earch_filea endif 




if s-3ichamgei endif 








if s04: let s-Od endif 








endprDC 










elete this record? <y/n>" 






if p*-~y" 






you sure? (y/n) 






if p*-"y": delete : els i re 


urn ■ Bndif 






print at 14, 5j " 




endif 





OL 



-oc start 
initialise 






,22; "NAME AND ADDRESS FILE" 



let p*-"a" 

while not tp«""y" or p*-"n"; 

let p*-getkeyli 



\ 



B'ESC'.then'FS'. 



cycles 


rocnd back to the menu 




im for September when in 


mm">ebypre a s De ing°ES 






election. For programm- 


Once a match Is found, then 


ting records. 

The third menu opiinn jilnw; 


'ENTER'. This '.lv,.<s v 


u some 
































called. Alter all, you first have to 






























IhTs 


c- , e e, , ' a B e nlrsi e 'ri P b°v 




r'e c g ord^ n owhlctyo l . s'r.Du 1 |d' f re s a 


fuT '-addrels" "after 


w'nnri 








pond d or m'. Having made 




































search through" file to find the 














aiidoneisprni'idcif *n 






ilnng of characters 


ends, and trie program returns to 
















cedures. Hoss-fuiiy H 
































flexible find command. For ex- 


'alter' is used to allow you to 


































name. If you want all the birth- 


and all the instructions needec 






!■:-, 


atTis'fou^Xn^he 




st re ^n ke |f C you 9 don^ H want''iQ 


m < utfiles?sTms S0Pl " 


nested 



[X COMPUTING 



QL SOFTWARE 



OL Software 

Damien Clay takes a look at some new 
games for the OL. 




qi;.|Jhii. s .-no viiiy Ljdnii = i r l c 
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■EDUCATIONAL REVIEWS! 



spectrum 
Education 

Mike Edmunds grades a couple of rp-i 

packages for those interested or ^m1\ 
involved with computers and education^pSn 




tainly di 
I rushing to them 



ik facing you Chemistry. The pi 

M the setting lor a mallet together with a pamphlet 

' schooldays with :;uii'.n;t! od lisi o' luriher snniy 

; lo.j'r.mLj! Did vy.i, md« including little packs of 

ers, find the task of cards!! 
unting prospect? I The programs themselves 



knowledge of Atomic 



yrjijrsi-: ■ w 



■mod w,:Ii!|,h Far.: is and some pf t 

■ if . i .u ;, to go select optior 

lengths ul s specially to apply yoi 



■Level, GCE, CSE enough as 



. You also pies anim 



lite goes a long nvgy to making 
e suijiucl more approiHchahe 



■EDUCATIONAL REVIEWS! 



This Is not a cheap package 


iT d' he fen^mture "l knewwhai 


hem a ' e " 


t even 


nenttaned 




rum 48k Ell 50 


„.,n.ihl.: :,i |jr«aenl I™ othe 
companies which do the job 


no details within the book for 


The Dit 


intenda 


to^te 


SE1 


s. Borough Rd., London 


need for a tevision package (her 


several of 'j^ 6 ^^**^ 


!'wr- ,|| P ,|"'- 


'"■■ ,i ', 


t'.Ml'.rt'l'n 


The* 


ftEEducationalSoftware 


these Me packs rf cards! 


^Th.stan hardly becalledafa, 


aware oTth 


atnga'o 


To'twere 


Dime 


hur & T.Russell 


Software 
directory 


here. 1 would suggest that il you 


That's a 


52? 


.,,:,„ r:.:, 


Esto 


*r. Plvniuiith PL6 7PZ 
rs must micros) E12.S0. 



iliiry '.iiio'u'jyciri'l. i ; , ju 
large to be o I use to a 







■HARDWARE PROJECT! 



Safe save 
Booster 



ssoffll a.nl R:\ir.-hiiiii. i! 



Anthony Marlow from Cheshire has sent 

in a useful little device for helping with 

SAVEing programs 




ing out and pushing back in the circle is seated which prevenrs a transistor i.TRI in our Gas 
power supply plug to provide a the curn.ici siyri.il l> y rw.orif- (.(insist;, of two pieces of an u- 

meypc-nslue hardware project a switch in the earphone line but (usually silicon! wilha Ihin sh( 



<; nor sufficiently powerful to tions in the recorder or Spec 

di vc the Spec-rum inpul when m ,m. i'he d'tuil iaVt:s lis powc 

Inarliiiuanrnnram.Tnnvercnme l,om lh« Sp-cuuir, power ; L ip|> 

lis ucbie" ne s r>-pic i-an- | v . since (his involves cutimi 

nds ties gnetj a"; Gj" "nis a switch was added a: the saim 

3ir.phl.es the 35141 hv nearly time 50 that power could b" 

I ue tiTes. so that the <ij\iut switched oil and 011 to effect i 

p?t circuitry O* the Spectrum. 5VS ' Bm r6SH ' 

maGNnoathaOIN socket output COnStrUCtJOn 

How it works 

■ fully understand how t 












ving t 



;, ::i!ic-r.-. 



,i :yj ii 






tipped soldering in 

Feedback 



e DIN socket is normally fhe has 






mode. Thus, if use could be collsctor to lha emlttoi Thus, if metre) and carefully cut one 

■e the ear- made of this output rather than a resisioi is pla(-d in (It? co'l".; wut; auou'.ciuhl niches frinr.nn,- 

e fact that circle will be b oken IV F h 

por table auio'i.Hii.jlly wMiou us having tor will be proportional to this off both cut ends and sepac'd: 

feed the to unplug or switch anything, chanyiiiy current, the precise the screen wires from the cen- 



(HARDWARE PROJECT! 



"HO^ 



l\*-> 



Y 



I 



I 




i=° 



] IT) 

1 1T1) 



i<° List of Parts 



d the on/off switch 
i power supply I- 



Cnpacitoi (C2.C3). 
1 xBClOB Transistor IT 
:or(R1,R2). 1 * S. P. ST. Switch. 
1 -3 pin DIM plug. 

3 *3.5mm jack jmuljs 



IS. P. ST.) su 

ln(Rgum2bl 



The Circuit in use 



will probably h: 



supply. across tl 



correctly. The ci 
ound lo slightly 
>ility to load sc 
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Fig. 2 Construction, showing layout of components 
and wiring (above) and sokk 
underside of the board (below) 
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SANTOS CAME 



Ml 



Derek Mearns shows us what poor 

Santa has to put up with every 

Christmas. 





13B 



Variables 


a .b 


reserved for READing DATA. 


p 


reserved [or FOR . . . NEXT loops, 
high score. 

prini positions for the obstacles nn stage one. 
reserved for RANDom numbers. 


- 


various including time on stage 3 and total oi Key 
Flag for whether or not Santa is Up in the air on stage 
X Co -ordinate of Santa. 


h* 


width of roof and Chimney on stage 2. 

cornoin./ihe ..iasi defined keys. 
reserved for INKEVS; 



S ANTA 'S CAME 



Program Breakdown 




!,,r r- c ,:, .,:(,.,,;, -. A ,.-.r,, ll ,. i: - :i::r ,- ?: ,,,|.,. v h. lr [,||, ;,,.,. ■ 


loeo™'^™ 


nst.1 iiioyom ii'diidmq notes on what certain 
-irisle.g. thePOKEsldo. 


15 


GOSUBs the UDGs. Originally these were part 


20 


primed in the instructions. 

The POKE sets the computer in CAPS LOCK 




Sets up variable that should not he reset at 


30 


Initialises veriablesttat need defining at the 


52 
60 99 

900-995 


GObilBi-. Hi .-.in instructions. 

Asks tor the User Defined keys Enter can be 

lines 9300-9550. 

Sets up variables needed for stage one 




including: 

910P.SSCI upr,) hul.ilhiM.mrt pOSiiiuiis fl-l 

types of obstacles. 

9 r n0 (.iOSLlBs -lie NEXT STAGE and brief 




990 This POkE (.:i..|il, :lii-:.-.:.i-i[iuler asking 
'scroll ?' at line 1070. 
995 GOSUBs the toMn: light countdown 
sunrcuiino. Bo'h 'h.-, o- :: ihe subroutine 


1000-1070 

1900-1980 
2000 


^rS'HSgl^ 5 ! and 


2020-2040 


D^aS^a^n o. the roof and sets up 


2100-2220 
2510-2590 

2600-2800 
30103090 
3100-3130 
3200 3240 
3300-3330 


C;in:,nnstheStflge2 'action', 
Stage 3 propet. 

Performs Santa's leap over the Christmas ' 


3600-3617 


Sets up the variables and screen for the next 


3620-3SOO 


thin thou ATTF(iijLiif:< :n ■:.■ riiffprent. Thus a 

using the ATTR command in line 372. 
Contains the main pert of Stage 5. 


Is? 


the REM statements serve just as well as a 
jld so you can go through them if you need a 
the latter parts of the program -- 5 mainly 



a: paper 0: border 

:E 23658,8 

PRINT AT 0,21 BRIGHT 
; CHRISTMAS NIGHTMARE' 



r LET R*=INKEYS: 



s>5 BEEP . 



)-R«: NEXT F 
4: FOR G=l TO 
XT G: next f: 



THEN CLS : 



99 NEXT G: NEXT F 

100 GO TO 200 

101 REM DEFINE GRAPHIC 
103 RESTORE 100 



DATA 18,63, 254, 252, 124,62, 1 
18 

DATA 30,30,76,111,236,253,2 
26,0, 1,1 ,3,255,252,68,68 

DATA 1,3,7,15,31,63,127,255 
I, 192,224,240,248,252,254,255 
2, 102, 102,255,25 





1 REM IHHHHI IHHHHHHHHHHHHHHMHHt 


5,255 








♦Underlined characters* 


170 


DATA 


0,0,64,96,224,255,255, 




♦are entered in # 


126,; 


8,62 






♦GRAPHICS mode. * 


180 


DATA 


255,32,32,255,255,2,2, 




jHHHHHHHHHHHMHHW ******* 


255 








10 REM INITIALISE SREEN AND 


190 


DATA 


60,66, 129, 129, 129,129, 




SOME VARIABLES 


6fi,6i 


,60, 


2r., 255, 255,255,255, 126 




22 GO SUB 101 


,60 















=00 REM SCREEN 1 








902 BRIGHT 0: PAPER 7: BORDER 7 


^S^^B^'^ v'^^i *L - 






935 INK l: PRINT AT 11,10; "PLEA 








SE WAIT" 


^A ^? ■^ssjj'.jjt. a f 






910 DIM P(Y*79,2>: FOR F=l TO Y 








*79: LET PiF.il-INT 1RND*30>+1: 
LET P<F,2)=1NT <RND*31 <-146: NEXT 


\s?.-*jpj\ ■^< > P. 






920 ink i: let N-a: let e-U le 


}?/;?/0£. j&£>&i>^i& 






950 GO SUB 9B00: INK 2: CLS 








990 POKE 23692,255 








995 GO SUB 9900 








1000 FOR F=l TO 100: LET S=S*I 








1050 PRINT AT 0,Xr*B" 








1060 IF F<80 THEN FOR G=l TO Y: 








LET N-N+i: PRINT AT 21,P(N,1)I 








INK 0iCHR* PtN,2>: NEXT G: PRINT 


/&£■& '■^\SJ^£j-^< 






AT 21,01 INK -U'B'IAT Z1.3II-B- 


C4^ W^. 






1065 GO SUB 1900 






1070 PRINT AT 21,01 INK SJ OUER 
















1900 LET R*=INKEY«: FGR G=l TO 4 








T IF K*<G>=R* THEN GO TO G*2B1I 


-.- -/?ir%i mm : nfxt F 




1910 NEXT G: GO TO 1960 


2110 go sub 90(,o: for p-0 ro ?•?: 




19?0 IP ATTR I1,X-1I058 THEN P 


"RINT AT 0,F) INK 21" *l INK O 




RINT AT l.X-li INK 2i-F'|flT 0,X| 






• ■: INK l: GO SUB 9000: GO TO 9 


O 2200 




00 


2120 NEXT F: INK 5: GO SUB 9000: 




1930 LET X-X-l: IF X=0 THEN LET 


GO TO 2010 




x=x+i: go to i960 


2200 LET X=F+l: PRINT AT , X j IN 




1935 RETURN 


K 2;"k."l INK 6I"H": INK z: FOR F 




1940 IF ATTR (1,X+1><>58 THEN P 


=2 TO 13: PRINT AT F - 1 , X ; ■ - i AT 




RINT AT I,X+1| INK 2;"£l'iAT 0,X| 


F,x;-M-)AT F*l,Xl*Q": FOR G-l TO 




" ■: INK i: go sub 9000: go to 9 


40: NF.XT G: NEXT F: IF X=16 THE 




00 


N LET S=S+100: GO TO 2250 




1950 LET X=X+1J IF X=31 THEN LE 


2210 FOR F-14 TO 15: PRINT AT F- 




T X-X-i: GO TO 1960 


l,Xi" "iflT F.Xi'M'IAT F+1,X|"S": 




1955 RETURN 


FOR G=l TO 40: NEXT G: NEXT F 




I960 IF ATTR ll,XI(>5B THEN PRI 


2220 IF X<16-<U/2*11 OR X>16+U/2 




NT at l,x; ink 2;-f-|at 0,X[" •: 


THEN FOR F=16 TO'20: PRINT AT 




INK l: GO SUB 9000: GO TO 900 


F-1,X1' "1AT F,X1"M-)AT F*1,XJ"3 




19S0 RETURN 


■: for g=i to 40: next g: .next f 




2000 INK l: LET S=S+50#L: GO SUB 


: INK 5: GO SUB 9000: GO TO 2010 




2005 PAPER 0: BORDER 0: CLS 


2300 INK 3: LET S=S+30*20*L: GO 




2010 RFM STAGE 2 


SUB 9B20 




7020 INK 5: LET E=2: GO SUB 9800 


2500 REM STAGE 3 




: INK 6: LET U-10-Y: IF U< 1 THEN 


2510 CLS : LET E-3! INK 5: GO SU 




LET W=l 


B 9800: INK 6: FOR F=5 TO 21: PR 




2030 LET 1 II 11 1 1 1 1 TO Wl 


INT AT F,12i-N-|TAB 191 "N": NEXT 




7040 PRINT AT 1 5, 1 6; " £.* i TAB 16!" 


FI PRINT AT 4 r 12! ■ NNUNNNNN- : Fn 






»■ 


R F-0 TO 3: PRINT AT F,13fNN'|T 




7100 PRINT AT 17, 15-U/2; V.'iC*; " 


AB 17J -NN-: NEXT F 

















HNHN- iAT 6, 13i "lt!»l"(AT 20,121" 




2690 PRINT AT F-1,16!" "iAT F, 


2530 LET X=I5: PRINT AT 5,15; IN 


16;""™"": FOR F-F-i TO 20: PRINT 




AT F-1,15;" 'iAT F, 15! INK 2 i " B 


2540 LET W=10-Y: IF W< 1 THEN LE 


■: FOR G=l TO 40: NEXT G: NEXT F 


T U=1 


: PRINT AT 20,15! INK 2!"F': FOR 


2550 LET U=U/2 


F=l TO 40: NEXT F: INK 5: GO SU 


2590 Gfl SUB 9900 


B 9000: GO TO 2500 


2600 INK 5: FOR F=21 TO 6 STEP - 


2700 LET X=16: PRINT AT 5,15!" " 


I: for g=i to u*i: next g: print 


: IF F=6 THEN GO TO 2650 




2710 IF F>6 THEN FOR F=6 TO F-I 


INT AT FH,16i- 


: PRINT AT F-1,16!" "iAT F,16f I 


2610 LET R*=INKEY«: IF R*=K*(2) 


NK 2i-Q": FOR Q-l TO 40! NEXT G: 


THEN GO TO 2700 


NEXT F: PRINT AT F-1,16; INK 2! 


2615 FDR G-I TO W*4: NEXT G: PRI 


■E*S FOR F=l TO 40: NEXT F: INK 


NT AT F,16i""— ": IF INKEY»-K»I2 


5: GO SUB 9000: GO TO 2500 - 






2620 NEXT F: FOR F=6 TO 21: FOR 


T AT 20, F! INK 2("A *S FOR G- 1 T 


G=l TO U*4: NEXT g: print AT F-l 


O 20: NEXT G! NEXT F 


,i6i- ";at F,i6i-— — : if inke 


2900 INK 5! LET B=S)50t ITtl0]*L: 


Y«=K*(2I THEN GO TO 2700 


GO SUB 9B20 


2625 FOR G=l TO U*4 : NEXT G: IF 




F<21 THEN PRINT AT F, 1 f. ; -„,■■■ 


3010 LET E"4! INK 5! GO SUB 9800 


2627 IF INKEYS=KS(2> THFN GO TO 


3020 INK 4: FOR F=101 TO 61 STEP 




-20: FOR G=l TO 30: PLOT 30-G/2 


2630 NEXT F 


,f-g: draw g,b: next g: next f: 


2640 PRINT AT 17,01 "TIME! " • PR IN 


INK 7: FOR F=26 TO 34: PLOT F,16 


T AT 20, lz;- ": FOR T=?0 TO 


: DRAW 0, 15: NEXT F 




3030 INK 3: FOR F=0 TO 15: PLOT 




XT T! FOR F=l TO 40: NEXT FI INK 


20-F/2.F: DRAW F+20,0: NEXT F 




5: GO SUB 9000: GO TO 2500 


3040 let u=10-y: let w=w/3: if u 




2650 FOR F=fi TO 21: FOR G= 1 TO U 


<I THEN LET W=l 




*4: NEXT G: PRINT AT F,16i"— "" [ 


3090 LET X = 30: INK 7: GO SUB 990 




AT F-1,16; INK 2J-0-: IF INKEY*- 






K*(l) THEN GO TO 2690 


3100 PRINT AT 21, Xi INK 2!"ti ■ 




2658 PRINT AT F-1,16) INK 2i"3 


■5110 FOR F-l TO U*4: NEXT F: IF 






[nkey*=k»<h then let x=x-i: LE 




21 THEN PRINT AT F, 16| '.-=»■ 


T S=S+l: IF X-6 THEN GO TO 3300 




2659 IF INKEY*=K*il) THEN GO TO 


3120 IF RND<.15 AND X>11 THEN L 




2690 


ET U=0! PRINT AT 21, X! INK 2!"E 




2660 PRINT AT F-1,161" "! NEXT 






F: PRINT AT F-2,16f INK 2i"E": 


3130 GO TO 3100 






3200 FOR F=7 TO 31: FDR G=l TO U 




20,14!" ": FOR T = 20 TO STEP -1 


*4: NEXT G: LET S=S+l: PRINT AT 




: PRINT AT I7,5iTi" ": IF INKEYS 


21.F-1!" E"l IF F-X AND U-0 THEN 




=K*(11 THEN GO TO 2800 


PRINT AT 21, X! INK Zi'E.": FOR 
F=l TO 20: NEXT FI INK 5: GO SUB 








3210 IF INKEY*=K*(3) AND U=0 THE 




j N LET U=l: LET T=0: PRINT AT 21 


"23£Szft->- -J C^^rX^W^ 


T 3220 IF 11=1 THEN LET T*T+IS IF 


C^^^F^V^^^t- 


-^ T=5 THEN LET U-0: PRINT AT 20 , X 




/ 3230 PRINT AT 21-U.X! INK 2!"E": 




/ IF F=X AND U=0 THEN PRINT AT 2 ^ 






., 



SANTA'S CAME 



2; ■£"! FOR F-l TO 20! 




K 2i-e*|flT F+l,4f' ■: FDR Q-l TO 

10: NEXT G: NEXT F 
3310 PRINT AT 10, 6;" ■! RESTORE 
3320: FOR F=l TO 5: READ A,B! PR 
INT AT A, B[ INK 2)-a': FOR Q-l T 
O 10: NEXT G: PRINT AT A 
NEXT F 

3320 DATA 9, 5, 8, 4, 7, 3, B, 
3330 FOR F=10 TO 21: PRINT AT F, 
0{ INK 2i-n - |AT F-1,01" ■: FOR Q 
=1 TO 10: NEXT G: NEXT F 
3340 FOR F=l TO 200: NEXT f 

5: LET S=5+50: GO SUB 9B2( 
3500 REM STAGE 5 
3510 LET E=5: INK 5: GO BU] 
3600 PRINT AT 20,0! PAPER ; 

FOR G-0 TO 5: FOR F-6+G TO ! 



PRINT AT I 



(AT 



g;"«-: next f: print at 

NK 6|"^"|AT G+n,31-GI"i 
: PRINT AT 6,21 INK 6; " 
i"B"IAT i,29|"E,"|AT 7,2 
3610 PRINT AT 19,15| IN 
INK 6j -H-: LET T-0 
3615 GO SUB 9900: IF IN 
I THEN PRINT AT 11,11; 
F 1 ": FOR F=l TO 100! NE 
NT AT II, 11| ■ 
3615 



3617 
00 ■ 



■ AT : 



,31' 



ANDS OF 
GO TO 



3620 FOR F=500 TO STEP 

3625 PRINT AT 2,7i INK 7 

3630 IF INKEY*=K*13) THEN LET T 

=T*1: GO TO 3650 

3640 NEXT F: GO TO 3700 

3650 IF INKEY*<>" THEN LET F=F 

-1: PRINT AT 2,7; INK 7iFi" ■ : 1 

F F>0 THEN GO TO 3650 

3655 IF F<1 THEN GO TO 3700 

3660 NEXT F 

3700 LET T=T*2: LET T=T-15*¥: LE 

T T=T-361 LET T=19-T: IF T<0 THE 

N LET T=0 

3710 FOR F = 18 TO T STEP -l: PRIN 



T AT F, 15[ INK ; 
AT F+1,15; ■ ■: 

ext g: let s~s+; 

3720 FDR F-15 Tl 



[■) INK 6| " 



FOR 6=1 TO 40: NEXT G: 
T,F*Z(-H": FOR J-l TO • 
J: PRINT AT 19,F + 2;-f: 



T 12,01 "YOU NOW PROGRESS TO YE 
■ i Y+1984' -WHICH, OBVIOUSLY, I 



9010 LET L=L-l: FOR F=I TO 100: 
NEXT F-. CLS : PRINT AT 6,2: 'BAD 

10[l-i " LIVES LEFT- 

9015 FOR F=15 TO STEP -1: BEEP 



INPUT LINE H* 
IF S<H THEN PRINT AT 12,1 
HIGH SCORE REMAINS "(H'"B' 

PRINT AT 19, 0i "PRESS ANY I 






SANTAS CAME 




n the green 1 igh 

INK 51 "> 1 ights 

.'I INK 3| ■) the 



right keys to guide : 

i INK 4| -B-l INK 81" 
I C| INK 7-,'C'S INK 
■nguiris ( "; INK 7; "£■ 

: 5i ") . 
fINT ' " 

igh ("; INK 2; "S 



get to th, 
the lift (■•" 
ht key to stef 



Ick t"l INK 6; "MM I 

e bottom disappears, 
ight key before your 

■STAGE 4: Cross the 

key. When a snowhal 



3,0; "STAGE 5: Pn 



■ brick disappears press key 
i(l)i" to step off.": GO TO ' 

i00 PRINT "Press key " I K* ( 1 } 



> achieve h 



IF INKEY*=-" 



t RETI 



I REM NEXT SCREEN r 

I CLS : PRINT AT 6,ii;"year:" 

?B4;AT 12,12;"STAGE "IE! FOR 
TO 80: NEXT F: CLS : GO SUB 
10: RETURN 

I REM END OF SCREEN MESSAGE 
i CLS : print AT 5, Hi "YEAR: ■ 

984; AT 10,0; "WELL DONE ' - S 



score: ■ ;s 



15,1 



K 2; "i"; INK . 



EM TRAFFIC LIGHTS 
RINT AT 1,0{ INK 2 
NK 6; -o-]AT 3,0] II 



Painters 

A brilliant two-player machine-code 

game which is a 1K masterpiece from 

Barry Smith. 




itfi Entering the game 



Control k 



16536 ihe ( 
for playing. 

GOOD LUCK. 



^T-.EFEFKHJfSEEITEEEEEKI-er.h" EEEEGEEE 
EEEEE£EE! - ! E-.tLE-.ElCflE CI. (. I. i . L f_ V F F FF FF. 
EEEEEEEEEEEEEEFEEEEFEEFFEEFfFf-Ff 
EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE 
EEEEEEEEEE 

2 REM EEEEECEEEEEEEEEEEEEEEEE 
EEEEEEEEEEEeEEeCEEEEEEF.eEEEEEEEE 



EEEEEEEEEEEEEEEEEEEEEEEEEEEE 
10 LETT R$i"" 
20 FOR = 16514. TO 1598V 
30 LET R = R + lRzl6635) *6 
4.0 IF fiS = ■■■' THEN INPUT R* 
50 POKE Pt,l_6*CODE RS+CODE R«<2 



47S 



R$ f TO 2 






CsyCM-iV^ ' VVfflri^ ' ^Ti^^: ' ^:^' 



. : -:x;lv1'-V ; >:^ 
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1664.2 
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It's easy to 
complain about 
advertisements. 
But which ones? 



Every week millions of advertisements 
appear in print, on posters or in the cinema. 
Most of them comply with the rules 
contained in the British Code of Advertising 
Practice. 

But some of them break the rules and 
warrant your complaints. 

If you're not sure about which ones they 
re, however, drop us a line and we 11 send you 
n abridged copy of the Advertising Code. 

Then, if an advertisement bothers / 
ou. you'll be justified in bothering us. _/ 
The Advertising Standards Authority W 
an advertisement is wrong, we're here to put it right 
ASA Ud.Depi 2 Brook HoustTorringranPlKe. London WQE7HN 



SPECTRUM CAME 



GOI 



Mark Richardson presents 
to avarice — he assures us 
not all diggers ii\M; 








Wnd.rl Ined I 



♦graphics mod*. 



■5 REM HtlttltttHHHQOLD ! HHHHKHHH 

13 CLS ! PAPER 7! CLE 

20 FOR N=l TO 140: PRINT INK 

M" "i: next n: border 6 

30 PRINT AT 21,271 INK 61" 

40 FOR M=8 TO 12i PRINT AT M, 1 
01 PAPER «| BRIGHT 11" 

" : NEXT M 

50 GO SUB 8600 

60 FOR N=l TO 3: FOR M=20 TO 4 
0: BEEP .02, M: NEXT M: NEXT N 

70 BORDER 6: INK 0: PAPER 7: C 
LS 



80 GO SUB B000 

90 POKE 23658, B 

99 REM HttttlNSTRUCTIONStttttt 

100 CLS 

110 PRINT "YOU ARE SEARCHING FO 

R "! INK 01 BRIGHT II PAPER 6i*G 
OLD' 

NT 

130 PRINT "BEHIND THE CASTLE GA 
TE IS A FIERCE GATE-KEEPER. " 
: PRINT " HE HAS ASKED YOU FDR T 



IS BETWEEN 1 AND 100. 
WILL GIVE YOU A GUESSE 
' " BE CAREFUL THOUGH H 



' TO CONTINUE" 



SPECTRUM CAME 




530 FOR N=S TD 13 

540 PRINT AT N.BfOS: NEXT N 

550 PRINT AT 14,81" D □ 

560 FOR N=15 TD 19 

370 PRINT AT N,S;8S: NEXT N 

580 FOR M=10 TO 40 STEP 2: BEEP 



600 LET TR=6: LET X-l+INT IRNB* 
100) 

999 REN HHttGUESS NUMBER It It It 
1000 IF TR=0 THEN CLS : PRINT A 
T 10, 0! -SORRY YOU HAVE BEEN EATE 
N BY THE GATE KEEPER-YOU ARE DEA 
D": FOR N=l TO 3: BEEP 1,-5! BEE 
P 1.5,-10: NEXT N: GO TO 8500 
1010 INPUT "PICK A NUMBER BETWEE 



1 00 " I Z 
I IF Z<1 or ; 



i THEN GO " 



1030 IF X-Z ' 



BORDER 0: PAPE 
R l: CLS : INK 6: PRINT AT 0,0! ■ 
YOU ARE AMAZING, YOU HAVE FOUND 
THE PASSNUMBER" : FOR N=l TO 50: 
BEEP .01, N: NEXT N: FOR N=30 TO 

l step -1: beep .01, n: next n: 

BEEP 1,251 GO TO 1380 



505 PAUSE 50: P^OT 90,0: DRAU 
100: DRAW -90, 10 
310 PLOT 163,0: 



,100: DRA 



dRCLE 127,80,10! PLOT 1Z7, 
DRAW 0,-20: DRAW 13,-20 
530 PLOT 112,30! DRAW 15,20: PL 
T 112,55! DRAW 15,15: DRAW 15,- 
5 

340 LET W«-- 
550 LET X*=" O " 

360 FOR N=0 TO It PRINT AT N,l| 
INK 4|W*IAT N.131 INK ZIW«|AT N 
231 INK 61 WC: NEXT N 
570 PRINT AT 2,11 INK 4|X*IAT 2 
131 INK 21X«lAT 2,231 INK 6IX* 
380 FOR N-3 TO 3 

590 PRINT AT N,H INK 4|W»|AT N 
131 INK 2|W*|AT N.25I INK 6|W«: 
NEXT N 
600 PRINT AT 0,0I"1"IAT 0,12) "2 



AT 1 



,24| "3" 



700 LET DR=1+INT (RND*31 
710 INPUT "WHICH DOOR?" i CD 
720 IF CD=DR THEN GO TO 2000 



DECEMBER/ JANUARY 1! 



SPECTRUM CAME 



1730 IF CDODR THEN GO TO 4000 

1999 REM tlttw GOLDSEARCH HUH 

2000 BORDER 5: PAPER 7: INK 0: C 
LS 

2010 PRINT AT B, 
THE RIGHT DOOR 
IDDEN IN THII 
U MUST MOVE WIT! 
YS. GOOD LUCK! 
2020 FOR N=l TO 
STEP 3: BEEP . 
T n: CLS 
2030 LET X=INT 
2033 LET Y=INT 
2040 PRINT AT X. 
2030 LET A=I2: LET B-12 
2060 PRINT AT A 

70 



RND*22 ) 
RND*32> 

INK 71 ■ 



THEN GO TO : 



THEN PR: 



T A,B; - ■: LET A~A-1 

2090 IF INKEY*="S" THEN 

T A,Bi ■ ■: LET B-B+l 

2100 IF A<=0 THEN LET A=0 

2103 IF A>=21 THEN LET A=21 

2110 IF B<-0 THEN LET B=0 

2113 IF B>=31 THEN LET ] 

2120 IF ATTR (A,B)=63 THEN GO T 

O 2300 

2130 GO TO 2060 

2200 PRINT AT A.BJ" * 

2499 REM HBHFIND GOLDHtltt 

2300 BORDER 2: PAPER 6: INK 2: C 

LS 

2303 PRINT FLASH HAT 10,01V!! 

! YOU HAVE FOUND THE GOLD !!!!.": 

FOR N=l TO 10: BEEP .2,23: BEEP 

.1,15: BEEP .3,20: NEXT N 

2308 PRINT AT A,B|* -: PAUSE 15 



25 It 



BORDER 6: PAPER 7: CLS ! 



f "YOU STILL HAV 
HOUND TO OVER 
CAN TAKE YOUR 



2520 PRINT AT 4 
E A DREADFUL 
COME BEFORE YOU 

GOLD HOME. - 
2330 PRINT AT S ,11 "HE IS GUARD 
ING THE EXIT TO THE CASTLE. LU 
CKILY YOU FIND THREE STONES ON T 
HE GROUND. CAN YOU KIL 

L HIM WITH ONE OF THESE?" 
2340 PRINT AT 14, If "CHOOSE YOUR 
ANGLE CAREFULLY (Between 50 



2330 PAUSE 800 

2399 REM fttt C0N8UER HOUND I 

2600 BORDER 4: PAPER l: INK 



2610 LET H=INT <RND*23+: 
2620 PRINT AT 21,0! INK 
T 21, l; INK 2; " 



2630 PRINT 



2640 FOR S=l TO 3 

2630 PRINT AT l,0t"SHOT NO.'iS: 

INPUT "Enter angle &f shot"; A 

2660 LET A=INT A: IF A>80 THEN 

INPUT -Angle I do great, enter aga 

in"; A 

2663 IF A<50 THEN INPUT 'Angle 

too small, enter again" I A 

2670 FOR N=0 TO 100 

2680 LET X=INT (0. 062*N* 190-A) ) : 

LET B=N*<100-N1: LET Y=INT (B*0 
.05) : PLOT X,Y 
2690 BEEP 0.1.B/100 
2700 LET L=21-INT (Y/8): LET C-I 
NT (X/B): IF ATTR IL,C(>64 THEN 

GO TO 2730 
2710 NEXT N 

2730 IF C=H THEN GO TO 2300 
2780 NEXT S: IF S>3 THEN PRINT 
AT 10,2i'OH, DEAR, YOU FAILED. 

NOW YOU WILL STARVE TO 
DEATH IN THE CASTLE": PAUSE 2 
30! GO TO 8500 

2790 INPUT "Press ENTER for anot 
her shot" iZ«: GO TO 2640 
2800 PRINT FLASH II "YOU HAVE K 
ILLED THE DREADFUL HOUND. NO 
W YOU MAY GO THROUGH THE DOOR U 
ITH THE GOLD"! FOR N=l TO 5: BEE 
P .5,12: BEEP .73,20: NEXT M: GO 

TO 3000 

2999 REM HHHGET HOMEHtttl 

3000 BORDER 4: PAPER 7: CLS : IN 
K 

3010 PRINT AT 3,0;" YOU ESCAPE F 

ROM THE CASTLE AND FIND YOURSEL 

F WITH THE GOLD AT THE TOP OF 

A GRASSY HILL. ■ 

3020 PAUSE 100 

3030 IF RND>.7 THEN PRINT AT 10 

,01 "SUDDENLY YOUR BAG OF GOLD 

DROPS, AND IN YOUR HASTE TO 
RETRIEVE IT YOU TRIP. 
YOU ARE FALLING....": FOR N 



I SPECTRUM CAME 



=14 TO 21: PRINT AT N,3i "tailing 

■: NEXT n: for N=I TO 3: FOR 

m=30 to step -2: beep . 03 , m : n 
ext m: next n: beep 1.3,-10: bee 

P 2, -23: GO TO 8300 

3040 PRINT AT 10,0|"YOU WALK DOW 
N THE HILL SLOWLY. YOU ARRIVE H 
OME AND LIVE IN PEACE WITH A 
LL YOU NEED."'" CDNGRATULAT 
IONS!': FOR B=5 TO 35 STEP 5: BE 
EP .5,B: NEXT B: FOR B=36 TO 4 S 
TEP -A'. BEEP .3,B: NEXT B 
3050 PAUSE 100: GO TO 8500 

3999 REM HttSLIFTttttW 

4000 LET M=i*INT (RND+2) 

4010 if cd=m then border 6: ink 
0: paper 7: cls : let tr=6: let 
x=1*int irnd*100): print at 10, 

li 'IT WAS A LIFT! 

LOOK WHERE YOU ARE NOW! ! 
(PRESS ANY KEY TO SEE)": PAUS 
E 0: CLS : GO TO 500 

4019 REM ttttttDRAGONtttttt 

4020 IF CDOM THEN BORDER 2: PA 
PER 7: CLS : INK 0: PRINT INK 1 
i PAPER 61 "THERE IS A DRAGON!!'* 
4030 DIM At(ll1,18l 



4040 LET AS 


tl)»" 


4045 LET A* 


121-" 


4050 LET A" 


(31-" 


4055 LET A« 


<4> = " 


4060 LET A 


(3)-" 


4065 LET A 


(&) = " 


4070 LET A 


<71 = " 


4073 LET A 


S(8> = 


4080 LET A 


ten. 


40B5 LET A 


i(10l 


4090 FOR N 


= 1 TO 



(INT AT N+3 
,61 INK 2!A*(N): NEXT N: FOR M=l 
TO 4: BEEP 1,-10: BEEP 1,-5: NE 
XT M 

4100 PAPER 7S INK 01 CLS 
4110 PRINT AT 4,01 "WILL YOU ADVA 
NCE (Key ""1""1 OR RETREAT? (Key 

■"0""] ■ 

4120 IF INKEY*="" THEN GO TO 41 



4125 IF INKEY*="1" THEN GO TO 4 

200 

4130 IF INKEY*="0" THEN GO TO 1 

500 

4Z00 PRINT AT 8,4;" "(AT 9,41" 

■;at 11,41" "SAT 12,41" ■ 
4210 PRINT AT 10,01" 

4220 PRINT AT 14,01 "YOU SEE A SW 
ORD LEFT BY A PREVIOUS ADV 
ENTURER. " : PAUSE 100 
4230 IF RND>.5 THEN PRINT AT 17 
,0) "UNFORTUNATELY THE DRAGON'S F 
IRE BURNS YOU TO DEATH AS YOU 

PICK UP THE SWORD!": FOR N-3 
TO -15 STEP -It BEEP .1,N: NEX 

t n: beep 1,-15: go to 8500 - 
4240 print at 17,01 "you stab thf 

dragon in it's heart.": bee 
p 3,-20: print at 19,01 "behind t 
he body is a corridor open the 

door at the end...": pause 200: 

GO TO 2000 
7999 REM tJ#»IGRAPHICStl*l« 
S000 FOR M=0 TO 5: FOR N-0 TO 7 
B010 READ C: POKE USR CHR« (144+ 
Ml+N.C 

8020 NEXT N: NEXT M 

8030 DATA 247,247,247,247,247,24 
7,247,247,128, 192,224,240,224, 19 
2, 128,0,1,3,7, 15,15,7,3,1 
6040 DATA 24,24,60,90,24,36,36,6 
6,60,24,60, 126,235,255, 126,60,32 
,230,226,62,62,34,33, 129 
B030 RETURN 

8499 REM HttHAGAIN''HH« 

8500 PAPER 7: CLS : BORDER 3: IN 



i YOU WANT 



THEN GO TO 83 



8310 PRINT AT II 
TO PLAY AGAIN" 
8520 IF INKEY»=' 
20 

8330 IF INKEY*="Y" THEN BORDER 
61 CLE ! GO TO 499 

8340 IF INKEY»-"N" THEN CLS : P 
RINT AT 8, 4J "THANK YOU FOR PLAYI 
NG'IAT 10, 10! "GOODBYE" 
8550 STOP 

8399 REM HHMTITLEtlHtl 
8600 INK 0! PRINT AT 9,111 PAPER 
6| BRIGHT 11 " 

BR 



8610 PRINT AT 


10, 1 


I PAPER 6 


IGHT 1 1 " 






8620 PRINT AT 


11,1 


I PAPER 6 


IGHT l|" 






8630 RETURN 







SPECTRUM CAME 



Program Details 



Poojan 

Pirn Ouakkelaar gives us the 

Netherlands version of The Three Little aeoo-gaio ^ „, 
Pigs.' "'■ 

^ -^^^_— ^^^^— variables 



2400-2B90 Screen2. 

3000-8499 Screen3. 

8500 8D25 Tree lor screens 

2 & 3 , 
9000-9400 Hall of Fame lin- 






,ng Th deve D ! V |nd h he?e h w" find YOUr T3Sk 






you must I) ions d<:pn"Hs on how far sc; 

loon to pre- away they are. The higher up in stai 
aching the the sky the balloon, the more 





20 CLS : PRINT AT 10,01 -READIN 
I GRAPHICS) HANG ON A SEC . ■ 
30 GO SUB 9500 

40 ink y; paper 0: border 0: B 
IISHT l: CLS 
45 LET z*-'P. a. PRODUCTIONS PRE 

;ents-: for z=i to len z*: print 

AT 3,z+3;z*<zJ: PAUSE s: NEXT z 
RESTORE 45: FOR n-1 TO 3: READ 
t: BEEP .15, t: NEXT n: DATA 0, Z 
4: BEEP .35,7: BEEP .20,4: BEEP 
.3,7 

50 RESTORE 50! DIM a<6>: FOR t 
1 TO 6: READ a<t>: NEXT t: DATA 
10,12,14,16,18,20: FOR x-1 



FOR y=20 TO . 



6,: BRIGHT 1! FOR x = 
AT 9, six) 1 -BS'IAT 
BEEP .01,0! BEEP .01 

1,10: PRINT AT 9,a(xl 
l,a(x> | ■ -: GO SUB 10? 



I GO TO 163 



20 CIRCLE 102,95,6: CIRCLE 
RETURN 

RCLE 118,95,6: CIRCLE 
RETURN 
140 PLOT 12B, 88: DRAW 5,0 
5,13,1.5: DRAW -7,0! DRAW 
DRAW 5,0: DRAW -5,-9,-2.3 

0: DRAW 0,-2: RETURN 
150 PLOT 144,90: DRAW 0,8 

!! DRAW 0, 



DRAW 

1,-2: 

DRAW 



DRAW -8,0: DRAW 0, - 
-2: PLOT 147,97: DR 
6,0: DRAW -6,0,1: RETURN 

63,92: DRAW 0,10: DRA 

DRAW 10,-10,2: DRAW 0, 

: DRAW 0,-13: DRA 

0,5,-2: DRAW 0,-5 

DRAW 0,3: RETURN 



3,0,-1 
0: DRAW 
< -3,0: DRAW 

DRAW -3,0, 



165 FOR t"l TO 2: FOR y=0 TO I! 

FOR x^-1 TO 7: PLOT INK i; BRIG 
HT y;56,72: DRAW INK xj BRIGHT 
y! 150,0: BEEP .02,0: DRAW INK x 



; BRIGHT 


y;0,48: BEEP 


02, 


7: 


DRA 


W INK x] 


BRIGHT y;-150,0: 


BEEP 


.02,9: Dl 


AW INK XI BR 


GH" 


vl 


0,- 


48: BEEP 


.02,5: NEXT x 


NEXT 




NEXT t 










170 BEEF 


1,0: BEEP 1, 


12 






175 DIM 


sll0) : DIM n* 


10, 


20 


: F 


OR t-1 Tl 


10: LET 11* (t 


— 


7-31171 


■?■?■?■?■?■?■?■?- 


77? ■: NEXT t 








180 INK 


6: BRIGHT l: CLS 






185 LET 


z*=-CONTROL': 


F0& 




1 T 


LEN z* 


PRINT AT 2,3+12! 


t% 


z> 1 


: PAUSE 3 


: NEXT z 


















A": FOR 


2-1 TO LEN X* 


PR 


INT AT 


6,z+3iz*(z) 1 : PAUSE 2 


NEXT 


z 


189 LET 


z«=*DOUN 






KEY 



SPECTRUM CAME 



Z-: FOR 1=1 TO LEN z*: PRINT AT 
S,?+5f zl(;i p : PAUSE 2: NEXT z 
191 LET z*-"FIRE SPA 

CE": FOR z-1 TO LEN z«: PRINT AT 
10,z+5iz*|j:> j : PAUSE 2: NEXT z 
193 LET **-■ 2 BONUS PIGS AT 10 

,000 AND": FOR 1=1 TO LEN z%: PR 



INT . 



II z 



1 LET !*— EVERY 20,000": FDR 



It HAT 



PAU 



SE 2: NEXT i 

200 FOR k-0 TO S00: IF INKEY*=" 
" THEN NEXT k: GO TO 9800 

250 LET bart=10000: LET nnan-S: 
LET dis=12: LET cag=2: LET rtow=l 
9: LET pig^ltfr LET mn=0: LET w=l 

0: let otage-i: let wi-5 

235 INK 5: BORDER 0: BRIGHT 1: 
PftPER 0: CLS 

280 LET Hl-nl+5 

285 LET H-wl+3: IF m>40 THEN L 
ET h-40 

290 LET dis-dis-2 

295 IF dls<=6 THEN LET dls=6 

297 LET z*-"STAGE •: FOR z-1 TO 

LEN z*: PRINT AT 10, Hn ; i* ( z> ; 
: PAUSE 3: NEXT z! PRINT stsg" 

300 RESTORE 301: FOR x=0 TO 135 



a,x 



DRAU 



301 DATA 36,34 

302 DATA 23,23 

303 DATA 21,21 

304 DATA 23,23 

305 DATA 21,21 

306 DATA 20,20 
1 

307 DATA 20,20 
. 

308 DATA 21,22 
! 

309 DATA 23,23 



INK 4) BRIGHT 1 
4| BRIGHT lla,0: 


,32 


30,28 


26,25, 


,23 


22,22 


21,21, 


,22 


22,22 


22,22, 


,23 


23,22 


22,22, 


,21 


20,20 


20,20, 




20,20 


20,20, 


22 


22 22 


21,21, 
22,22, 


,23 


23,23 


23,23, 


-*1 


22 22 


23 23 


,22 


22,22 


22,21, 



',29 



BRIGH 



■H .H'lAT 21, 

PRINT AT x,23 

DRAW 26,0: DR 

INVERSE II PAPER 



1|" 

LET a*=" 
: LET x-7 

400 LET z»-"READY ■?": FOR ; 
O LEN z«: PRINT AT 12,z+ll|: 
: PAUSE 3! NEXT z 

410 RESTORE ■ 

READ t: BEEP -30,t: NEX 
A 12,10,9,7,5,2,0,0,2,3,' 



500 LET i-INT <RND*5+1.5) 

501 IF i=3 THEN SO TO 501 

502 LET X3-INT 



THEN LET | 



NVERSE llpigl ■ • 
513 IF plg-0 THEN GO TO 9600 
520 IF n-0 THEN PAUSE 50: GO " 



550 FOR t«l 
552 LET t2=t 
333 IF tOx: 



375 LET ii-u+1 a*="FG*: LET y-ZZ: LET u-3: GO 


578 IF u>=l AND u<=7 THEN GD S 


TO 500 


UB 2000+u*5 


1030 IF ATTR (xZ,y)-71 THEN LET 


5B0 IF u>-19 THEN LET pig=pig- 


5c-bc+10: PRINT AT 0,14fsc: PRI 


1: PRINT AT 16,26) INK 0; PAPER 


NT AT u+2,y|" 'iflT u+3,yf" •: 


11 BRIGHT Bl'MAMA!-: BEEP .05,12 


BEEP .01,6! BEEP .01, 1Z: LET aS= 


: BEEP .05,6: BEEP .05,0: PRINT 


"££■: LET y-Z2: GO TO S7S 


AT U- i,t2| PAPER 01" "iAT u,t2S 


1045 PRINT AT xZ,y| INK 51 "FG- 


PAPER 0; ■ "(AT utl,tZ| PAPER 


1050 IF t-x3 THEN GO TO 575 


1- -(AT u+2,t2l PAPER 01- ■: LET 


1060 NEXT t 


u=0: LET w-M-1: BO TO 500 


2005 PRINT AT u,t2( INK ii'BS'lA 


600 PRINT AT 16,25| INK 4| BRIG 


T u+l,tZI INK iJ-CD-iAT 11+2,121 


HT vn-BMMB-: PRINT AT u,t2t IN 


INK 7I-J-JAT a+3,t2| INK 7;"K-|A 


K ii-E&'lAT u+l,t2) INK 1|"CD'|A 


T 0,5| INK 5|- SCORE: -isci ■ 


T u*2,tZI INK 71-J'IAT U+3, tZJ I 


: GO TO 760 


NK 7i-K»|AT u-l,t2l INK 0|'BB-: 


2010 PRINT AT a,tZ| INK tl'Sg'fA 


GO TO 760 


T u+l,t2| INK lJ'CD'lAT u*2,~t2; 


750 PRINT AT 3,tl INK 71"H'|AT 


INK 71'J-IAT u*3, t2| INK 7J PAPE 


4,ti INK 7J"i"|AT 3,t-lf" -JAT 4 


R 4I*K-|AT u-l,t2J PAPER 0|" ■: 




GO TO 760 


755 IF INKE¥»='- THEN GO TO 85 


2013 PRINT AT u, tZ| INK i I'M' J A 





T u+l,tZ| INK 1J-CD-JAT U+Z.tZj 


765 IF INKE¥*=-a" THEN PRINT A 


INK 71 PAPER 4I--J-IAT u+3,t2| IN 


T X+Z.Z3I" -|AT x+1,211- ■: LE 


K 7; PAPER 4|'K"|AT U-I,t2l PAPE 


T x-x-1 


R 0| " " : GO TO 760 


770 IF x<=7 THEN LET «-7 


Z0Z0 PRINT AT u.tZ) INK il'BB-JA 


780 IF INKEY«=-z" THEN PRINT A 


T utl.tZI INK 1| PAPER 4i ■CD-I AT 


T x,23l"g - |AT xtl,21|- ■: LET 


u+Z.tZI INK 7) PAPER 4["jJ"|AT u 


x=x + l 


+3,tZ( INK 7J PAPER 0)-K'|AT u-1 


735 IF i>"19 THEN LET x—19 


,tzj PAPER 0|- -: GO TO 760 


810 IF yOZZ THEN GO TO 850 


Z023 PRINT AT u,t21 INK i! PAPER 


820 IF INKEY*-- ■ THEN LET x2= 


4l"R6-jAT u+l,tZ1 INK 1| PAPER 


X+11 LET y=y-J: LET a*«" 


4|*CD-|AT u+2,t2| INK 71 PAPER 


850 PRINT AT x,Z3I INK 6)"kIl-|A 


l"J"|AT u+3, t2J INK 7; PAPER 01" 


T x+l,23j INK 6| ■NO" |AT X+2.Z3I 


K-iAT 11-1,121 PAPER 0( ■ ■: GO T 


INK 6i - PO'(AT x-l,Z3l INK 6|"E-| 


O 760 


AT x*l,Zl| INK 3Ja« 


2030 PRINT AT U,t2| INK 1| PAPER 


860 IF t=x3 AND yOZZ THEN GO 


4CQB-(AT u + l,t2| INK 11 PAPER 




0)"CD-|AT u+2,121 INK 7| PAPER 


870 IF t=x3 THEN GO TO 575 


1 "si" FAT u+3,t2l INK 7| PAPER 0| ■ 


880 IF y=22 THEN NEXT t 


K'lAT U-I,t2( PAPER 4) ■ ■: GO T 


900 LET y-y-2 


O 760 


1000 IF y<-2 THEN PRINT AT xZ,3 


2035 PRINT AT u,t2| INK l| PAPER 


1" ■: LET y=22: LET x2-2: LET a 


01'RB'iAT o*l,t2I INK i; PAPER 


*=-F_G'; GO TO 1050 


8i"ED-jAT u*Z,t2l INK 71 PAPER 


1010 PRINT AT x2,y*Z|- 


;-J-|AT u+3,t2; INK 71 PAPER 0; • 


10Z0 IF ATTR (xZ,y)-64+i THEN P 


K"|AT u-l,tZI PAPER 4| ■ ■: GO T 


RINT AT u,tZI"B§"IAT u*l r t2l -TU- 


O 760 


: BEEP .01,0: BEEP .01,51 BEEP . 


2400 INK 5: PAPER 0: BORDER 0: B 


01,10: LET M-w-l: LET at»HC+(20- 


RIGHT l: CLS : LET z*-'CHANCE ST 


u>*10: PRINT AT 0,14lsc: PRINT A 


AGE": FOR z-I TO LEN z*: PRINT A 


T u,tZ|" '[AT u*l,t2[- ■: FO 


T 10,z+8lz*(z) i : PAUSE 3: NEXT z 


R z=u+Z TO 20: PRINT AT i.tZi IN 


: GO SUB 8300 


K Zi BRIGHT 1|-J*1AT ztl,t2( INK 


Z403 DIM b(10,2> 


2| BRIGHT li"fi*|AT z-l,tZi INK 


Z403 FOR t-I TO 10 


«!Ti NEXT z: PRINT AT z-l,t2;- 


2410 FOR r-1 TO Z 


"iAT r.tZi" -: BEEP .01,-1: LET 


Z415 LET b(t,r)-INT ((dls+RND*4) 


IX COMPUTING DECEMBERlJAMUARY 1985 101 



SPECTRUM CAME 



2507 FOR x=0 TO 7: PRINT . 
I INK ",; "E": NEXT ■ 
2510 PRINT AT 12,25; INK '. 
R B\ • 





■ 


I AT 13 


23 






■|AT 1 




•m 


■•■(AT 


IS 


2b 






A 


2b 


PAPER 






4i 


BRIGH 






■ ■I AT 


17 


251 


■■ 


HHI' 


e 


25 






AT 


19, 


251 "■ 




AT 


20,251 








AT 21, 



2380 PRINT AT y22,b(r,2)l INK i2 
)-CD-|AT y22-l,b{r,2l| INK iZ("P 
B-1AT y2Ztl,b(r,2) I INK 0; 'H' 
2585 IF INT <y22+.5)<-6 THEN PR 
INT AT 5,b(r,2)| 'RS'IAT 6,b(r,2) 
i -tjj» : BEEP .01,0: beep .01,3: B 
EEP .01,10: PRINT AT 3,b(r,2)J" 

*|AT 6,b<r,2)|- ■: LET y21-20I 

LET y22-20: GO TO 2523 
2590 IF INKEY*="" THEN GO TO 27 
00 

" THEN PRINT A 



2313 PRINT AT 0,B| "SCORE: ■ |sc 
2517 LET I»--READY 7* ! FOR z = l 
O LEN z«: PRINT AT 12, 1 l+zl z*( a 
i: PAUSE 3: NEXT z: LET stagp-; 
age+1 

251B RESTORE 2518: FOR n-1 TO 1 
: READ t: BEEP .30,t: NEXT n: I 
TA 0,4,0,3,0,7,5,4,1,5,2,0,-1: 
EEP .45,0: PRINT AT 10,8; " 

■(AT 12, 12) ■ 
2520 LET hit=0: LET r-0: LET tt 
nt-10: LET x2=2: LET y=22: LET 
«5: LET al-'FO 1 

2325 LET r=r+l: LET vv-1: LET \ 
ll LET y21=20.6: LET y22-20.3 
2526 LET il-INT (RNT)*At 1 .fit : II 



il-i 



GO " 



2527 LET 12-INT <RND*6+1.5I: IF 
12=5 THEN GO TO 2526 

2528 IF il-12 THEN GO TO 2327 
2530 IF r=ll THEN GO TO 2850 
2332 IF ac>-bon THEN LET pig=p: 
g+2: LET bon=bon+20000 

2535 PRINT AT 1, 



2555 IF v=0 AND V 

2525 
2357 IF vg THEN 
2560 LET y21=y21- 
2565 IF INT (y21+ 
INT AT 5,blr,ll ,-• 



■I AT r 



,0 TO 2575 
} 

IK'S THEN PR 
=-|AT 6,b(r, 1> 
BEEP .01,5: B 
*T 5,b<r, 1) I " 
": LET v=0: GO 



2570 PRINT AT yZl,b(r,l>| INK 1 
i-CD'lAT y21-l,b(P,l)l INK 111" 
B'lAT y21tl,blr,l)l INK 0; 'H" 
2572 IF vv-0 THEN SO TO 2600 
2575 LET y22-y22-.5 



2615 IF x>-19 THEN LET x=19 
2617 IP y<>22 THEN GO TO 2700 
2620 IF INKEY*'" " THEN LET x2= 
x + l: LET »«=": LET y=y-l 
2700 PRINT AT x,23( INK 6I'LM'rA 
T x+1,23; INK 61-N0 p |AT x*2,231 
INK 61-po-jAT x-l,23I INK 6j-e-| 
AT x+1,211 INK 5)a« 
2800 IF y-22 THEN GO TO 2550 

2802 LET y=y-2 

2803 IF y<=2 THEN PRINT AT x2,3 
I" ■: LET rt'-FG": LET y-22! GO 

TO 2550 

2804 PRINT AT x2,y+2i" 

2807 IF ATTR (x2,y)=64+i2 THEN 
PRINT AT y22-l,blr,2) I -PS'IAT y2 
2,btr,2H -TU-iAT x2,y*2i' "! BE 
EP .01,0: BEEP .01,5: BEEP .01,1 
0: PRINT AT y22-l,b (r,2> ; ■ ■ ; AT 

y22,b(r,2)I" "I LET y=22: LET 
at-'FG'i LET vv-0: LET sc-9c+b(r 
,21*15: PRINT AT 0,14;sc: LET hi 
t-hit+li SO TO 2555 
2810 IF ATTR <x2,y>=64+il THEN 
PRINT AT y21-l,b(r, 1) I "R3"|AT y2 
l,b<r,IH"iyiAT x2,y*2J' ": BE 
EP .01,0: BEEP .01,5: BEEP .01,1 
0: PRINT AT y21-l,b(r, 1) ; ■ " ; AT 



yzi 



LET v-0: LET scsctblr 



2850 FOR g-0 TO 100: CLS 
2855 LET z»--NUMBER OF HITS :": 
FOR g«l TO LEN z*: PRINT AT 8,g + 
6|i*l?l|: PAUSE 3! NEXT g: PRINT 
INK 7thit 



SPECTRUM CAME 



100X"! FOR 
' AT 10,g+5Iz 
' g: PRINT Ih 



2B60 LET i.»-"30l 
9-1 TO LEN «•: I 
»(g> I ! PAUSE 3: 
it; ■= ■« INK 7C 
2B70 IF hit=20 THEN LET zS=-EXT 
RA BONUS : 25,000-: FOR g=l TO L 
EN i*: PRINT AT 13,g+5( INK 61 z* 
(9>: BEEP .07, CODE ;*<g>-60: NEX 
T g: LET sc-sc+25000 
28B0 LET 5rn*c*hU*lTO 
2890 RESTORE 2890: FOR n-1 TO B: 
READ t: BEEP .35, t: NEXT n: DAT 
A 12,9, 7, 9, 12,9,7,9: BEEP .5,5 
3000 INK 5: CLS I LET z«-'STAGE 
■I FOR z-1 TO LEN : 
0, 1 l + il i*lz) | : PAUSE 3: NEXT : 
PRINT 5tagp: LET stage'sta^et: 
GO SUB 8500 
3010 LET naH-19: LET i 



3100 PRINT AT 0,1 



LET 



x-0 TO 7: PI 
B" : NEXT x 
IT AT 12,25; 



16,251 PAPER 



25; *M RB" 

3115 PRINT AT 0,B; "SCORE: *)sc 
3120 PRINT AT 1,191 INK AfdFlb'l 
AT 2,19; INK 6; "JT ' 
3130 PLOT 229,165: DRAM 26,0: DR 
AU 0,10: DRAW -26,0: DRAW 0,-10: 
PRINT AT 0,291 INVERSE II PAPER 



3140 LET zI-"READY ?": FOR z=l T 
LEN i»: PRINT AT 12, 1 1+2 ; z* tz ) 
i : PAUSE 3: NEXT z: FOR t=0 TO 8 
0: NEXT t: PRINT AT 12,121" 

■)AT 10,121* 
3150 LET y2-21: LET a*=-FG-; LET 

y=22 
3152 LET K3-INT { (d i a+RND»4) +. 5) 
3155 LET i-INT IRND+5+1.5): IF t 
=5 THEN GO TO 3155 
3157 IF 5D=bDn THEN LET pig-pi 
g*2: LET bon-bon +20000 
3160 PRINT AT 1,1 
PER 1|HI" '(AT 0,29l«noi 



i THEN GO ' 



3180 PRINT AT y2-l,x3l INK 71 ■ J" 
1AT y2,x3J INK 7I"K': GO TO 3500 
3200 LET y2-y2-l 
3210 IF y2<-7 THEN GO TO 5000+y 

3220 PRINT AT yZ-3,x31 INK IJ-ag 



yZ-2, 
x3I INK 7 

,"|AT y2 + 



3) INK il 'CD-)AT y2-l 
"iJ'IAT y2,x3i INK 7| ■ 
X3[ INK 0| "B-IAT y2-l 



x<-5 THEN LET x-S 
INKEYS--3- THEN PRINT A 
■(AT x+1,211 ■ ■: LET 



3530 IF INKEY*-" ■ THEN LET : 



TO 3200 
3670 IF ATTR 



=2 THEN PRINT AT x: 
="E£-i LET y-22: 



AT : 



txz, : 



+21 ■ 



+ i 



♦ 10: 



y»=6- 

R5*(AT y2-2,x31 
BEEP .01,5! BE 
AT y2-3,x3i INK 
■■IAT y2-2,x3)--«- : FOR t-y 
20: PRINT AT t,x3l INK 2J-.J 
t + l,x3l INK 2CK-JAT t-l,x3 
0CB-: NEXT t: BEEP .01,-1 
NT AT 20,-3; INK 0j-H"iAT 2 
"■": LET Nam-la LET 5c=5C+y 
PRINT AT 0,14Ssc: GO TO 31 



50 

36B0 IF ATTR <x2,yl=71 THEN BEE 
P .01,61 BEEP .01,12: PRINT AT y 
2,x3; INK 01 ■•W: LET sc-sc+10: 
LET a*-'FG>: LET y-22: GO TO 320 

3900 PRINT AT xZ.yl INK SI "FG" 
4000 GO TO 3200 

5010 PRINT AT l,x3J INK 71"iJ'(AT 
'IAT 3,x3) INK 41 ■! 



H 



I-1A 



,x3| 



3170 IF H-l 



SPECTRUM CAME 



IB: PRINT AT l,l|"H-|AT 2,t|-i': 

NEXT t! LET yZ-21: GO TO 3132 
5013 PRINT AT t,x3| INK i|*CD-|A 
T 2,x3; INK 7|-J"|AT 3,x31 PAPER 
4|"K*|AT 4,x3| INK 4|"B-|AT 2,x 
3-HI INK «)■■■: GO TO 3300 
5020 PRINT AT l,x3| INK II 'SB'IA 
T 2,x3( 'CD-iAT 3,>t3| PAPER 41 IN 
K 71-J'IAT 4,x3I"K-IAT 5,x3{ INK 



0; ■ 



INK • 



GO 



TO 3300 

3023 PRINT AT 2,x3l INK 1|"SB-(A 

T 3,x3| PAPER 4fCD-|AT 4,x3l IN 

K 71'J'IAT 3,x3| PAPER 0|"K*|AT 

6,x3| INK 01-H-iAT 4,x3+l| INK 4 

i "■" : GO TO 3300 

5030 PRINT AT 3,x3| PAPER 4( INK 

i|*aS")AT 4,x3| *CD-|AT 3,x31 PA 
PER 01 INK 7t"4i"|AT 6,x3|'K*|AT 
7,x3| INK 0fl'iflT 3,x3 + ll'l*: Q 
O TO 3500 
5035 PRINT AT 4,x31 PAPER 4; INK 

ii"RB*|AT 5,x3i PAPER 0;"£D-|AT 



INK : 

INK 



I' I at : 

I AT 6 



x3|- 



I AT 



) I : 



PRINT i 



5567 IF raq<:-0 THEN PAUSE 200: 

GO TO 9600 

3570 PAUSE 100 

5375 LET nnoH=mnoH-l : IF mnoH<=3 

THEN LET ninoH-3 
B499 GO TO 253 
B500 RESTORE 8305: FOR x=0 TO 15 



41 BRIGHT 



f 

8503 DATA 36,34,32 
3,23,23,23,22,22, 
ZZ, 22, 22, 22, 22, 23, 23 
,22,22,21,21,21,2 
0,21, 21, 21, Zl, 21, 
23,23,22,23,22,21 
8310 DATA 20,20,2' 



20,: 



0,20,20,21,21,2 

22,22,22,22,22, 

, 23, 22 , 22 , 23, 23 , 23 , 23 

3,23,23,22,22,22,22,2 

22,23,22,21,21,21,20,: 



23,23,23,: 



U'HV 



5510 FOR t-1 TO H-2: 


RINT AT t, 


221 INK 6! ■ J-fc - | AT t* 


,22| INK 6 


1 "Mr "(AT t-1, 22| ■ E 


: SEEP .01 


,0: BEEP .01, t: NEXT 




5512 PRINT AT t-1, 22| 


Ri s-| AT t, 


221 ■HI 1 ; PAUSE 5 




5515 PRINT AT t-1, 221 


"iAT t, 


2 2, ■ 




5517 PRINT AT x+1,21) 




5520 FOR t=x*2 TO 21 




5540 PRINT AT t-2,23i 


INK 61 ■LM J 


IAT t-1, 231 INK 61 "NO 


IAT t,23( 


INK 6|-PO*|AT t-3,231 


■: BEEP 


.01,6! BEEP .Bl.ZM 




5545 NEXT t 




5550 PRINT AT 19,23; -RS-tAT 20,2 


3; ■ -|AT 21,231 "TU"! 


BEEP .01,0 


: BEEP .01,5: BEEP .0 


># 


5555 PRINT AT 19,231" 


"IAT 20,2 


31 ■ "(AT 21,231 ■ ■: 


PAUSE 5: L 






3537 PAUSE 50 




5560 CLS : PRINT AT 


101 "SCORE: 


■isc: let 7»- , pigs left : ■: for 


fl TO LEN z*: PRINT 


AT 10,t+9I 


:*ltli: PAUSE 5: NEXT 


t: PRINT p 



173,172, 172, 17 



8525 RE 

9000 DIl 

ABC 



BS(6,30): LET m«(2l=" 
l E F G H I J K-: LET MS 
(4I»" LMNOPHRSTU V": 
LET M*<6>-' U X Y Z . ? EN 
D RUB': LET n-1: INK 6: BRIGHT 1 

9010 FOR a-2 TO 6 STEP 2: FOR b= 

1 TO 25! PRINT AT a, bin* (a, b> : N 

EXT b: NEXT a 

9012 LET z»-'YOU MAY ENTER YOUR 

NAME.*: FOR 1=1 TO LEN z«: PRINT 
AT 18,z+3lz*<z> | : PAUSE 2! NEXT 
z: LET z»="( USE UP/DOWN !< FIRE 
»"! FOR z-1 TO LEN z»: PRINT AT 
20,z+4|z*(z) | : PAUSE 2: NEXT z 

9015 PLOT 48,78: DRAW INK 71160 

,0! 

9020 LET x-2: LET y=5 

9030 PRINT AT x,y| OVER t| ■__• 

9037 PAUSE 

9040 IF INKEYSO-a" AND INKEY*<> 

■z- AND INKEY»<>" ■ THEN BO TO 

9037 

9042 IF INKEY*-* ■ THEN BEEP .0 

3,23: GO TO 9300 

9050 IF INKEY»-"a" THEN LET y-y 



DECEMBERIJAMUARV Y. 



SPECTRUM CAME 



AT 2 
O TO 



9800 
9310 IF 
O 9383 



9315 
93S5 
9390 



INKEY*-'S" THEN LET ; 
fO 9073 
y>25 AND x-2 THEN PR 



THEN PR 



AND y=22 



y- 



=26 AND x-6 THEN 

et *=2: LET y-5: 

'RINT AT K,y-2| OVER 0;m$<: 
GO TO 9030 

5 AND x=2 THEN PRINT 



LET 



F x=6 AND y=22 THEN PRINT 
24; "UV LET x=6: LET y-20 
F x=6 AND y=18 THEN PRINT 
20J-N-: LET x=6: LET y=17 
F x-6 AND y<3 THEN PRINT 
i"W: LET x=4: LET y-25 
F x=4 AND y<5 THEN PRINT 
l"L": LET x=2: LET y-25 
RINT AT x,y+21mStx,y+2> 

Q y=20 THEN 00 TO 

* y<>24 THEN GO T 

it-" ■: PRINT AT 1 

LET n-n-l: IF n< 1 THEN BEE 
-5: BEEP .5,-12: LET n=l 
GO TO 9037 
.ET n-n+1 

9 THEN 

■ PRINT AT 11,3 



GO TO 9800 



9400 GO TO 9030 

9499 STOP 

9300 RESTORE 9303: FOR x-0 TO 16 

7: READ v: POKE USR "n"+x,v: NEX 



9320 DATA 234,254,232,240,192, if 
8,128,128 

9523 DATA 1,1,1,1,1,1,1,1: REM > 
rope IE) 

,48, 127,48,24,8: 



9330 DATA 
REM 9530 Tl 
9535 DATA 



<F 



.,2,4,235,4,2,1 
95^0 DATA 160,224,176,235,245,25 
0, 127,112,112,252,208,208,208,20 
0,254,254: REM > walking wolfe ( 



9550 DATA 1,3,15,30,56,112,255,8 

,0, 128,224,240,60,30,235, 1 15j 24, 

33, 100, 199,233, 199,100,33,231, 

7,251,115, 123, 251, 231, 25 1,24, t 

,0,3,7,255,255,231,251,243,243,: 

43,243,255,235 

9560 DATA 0,8,24,24,36,104,1 

4 , 28 , 30, 59, 58, 48 , , , 248 , 241 

67,7, 13, 14,14,0,0,24,13,7,3. 

9365 RETURN 

9600 CLS : PRINT AT ll.lU-GAME 

OVER - : PAUSE 150 

9602 IF 5c<s(10l THEN GO TO 980 



9605 


FOR j=l TO 10 


9610 


IF •-...■:--. <j > THEN NEXT 


9613 


FOR c-9 TO j STEP -1 




LET n*(c + l)-n«(c) : LE 


11 -a 


c) : NEXT c 


9625 


LET ={j )-5r 


9627 


LET n«(j )-"■ 


9630 


GO TO 9000 


9800 


CLS 


9R05 


PRINT AT 3,10) 'HALL O 



I FOR ; 



TO 10: 



'RINT AT i- 
,0in*(z>i> - -isll): NEXT x 
9B15 PLOT 0,0: DRAW INK 3J255. 
: DRAW INK 610,175: DRAW INK 
1-253,0: DRAW INK 6;0,-175 
9820 PAUSE 30: LET i*""Pre55 ai 
bey to play.": FOR i=i TO LEN 
*: PRINT ttUAT l,z+5;z*ti>i 

9830 FOR k-1 TO 5: FOR c=l 



MIX 



9510 

4,234,254 

9313 DATA 127,127,63 



92 , 240, 248 , 232, 254 , 25 
5,3, 1,1,1 



5,0: 


DRAW INK l;(!, 


75: DRAW IN 


K c| 


255,0: DRAW I 


K c;0,-175 


9833 


IF INKEY*< > ■ ■ 


FHEN GO TO 9 


9837 


NEXT c: NEXT 1. 
GO TO 230 


GO TO 180 



ZX81 STRATEGY 



y>: Robin Thompson takes the tedium out 
■:•:■: of the game with this ZXS1 version for 
¥ft 2-4 players. 



Typing l Us program in should 



0) 



Line by Line 




l toB5 
8E tol 


• 


iniiiatraation of variables and 


to play, their let- 


311 10 

319 to 


30 
IS 
02 


work out the coordinates of 

the board. 

□onus score of 50 points w 

all sevan letters in one go. 

score, and prepare for nexl 


~i 


Subrout 

3000 


he. 


others on the hoard, and arj 


"""'.:=, 


3800 
4000 




POKEs your letter onto the 
allocates new letters, and p 


"STh.m.n 


5000 
6000 




£^|j&££££ 


who,=o,.a 


7000 




works ont if player gets do. 


J.o,Iri B i.»ord- 


aooo 

9000 




nfm^andDl^s'arrl'yVm 


dtMheifseores 


950O 
9900 




prints out Ihe board. 

routines used when all the 1 

program SAVEd so that it a 


'""c,"""" 



i 



ZX81 STRATEGY 





111111 
1SG4 567S9012 34S 




4 


B..i. M.,..h.M 

!rs!!Ts-s...&.. 

W- .e.L.r.-.iC ^.H 

ji s A a ..% 


TO GO 

wi.fl5IHODO 

OUR 
LETTERS ORE 
GIL QCRN 






M uas 



■ "Pr r ... ip< 

,- rr?- en a 23 



: LET t>=0 
. LET Ql=9 
: LET D1*0 



THOMPSON 



14. PRuSE ISO 

15 CLS 

-1 ■1-0;..:= 9OC0 

ZC 11SUE S000 

ii :-:iu= 9500 

25 SLOW 

52 PSU3E 4.^0 

50 CLS 

65 RPINT :: TO i; 

-,-PE IN THE GHIC 



THEN 1 
~HEN : 
"000 



YOUR WORD 

UP SCORE 
7* PRINT 
75 PRINT " 

E5EMT5D 



ESE'fl BlRN! 
|l SIMPLY ' 
/R5E SFSCE 



I DENG":: i 
DfUQ-f: 
IFrjOTffi 
RE HMD H 



£30 INPUT J 

235 IF J 1 Oh: .J IS OP K<1 OR K 
IS THEN GOTO 103 

286 IF T = l TI-EN C-05UB 30£5> 

290 GO-BUS 7O0O 

50O LE~ Es iK : .Jj =h4 

302 GCSlS 3302 

210 NEXT T 

313_PRINT FT 10,3; ■■ IJELL DONE 

31A i pRXNT 

SIS PRINT " VOU'.'E USES SLL YOU! 

-ETTERB HMD GfllNED H BONUS 

OF 50 POINTS" 



DECEMBER.JANUAFIV 1! 



ZX81 STRATEGY 



321 IF 01=3 THEN GOSUE 720O 
324- PRINT a- 13 . "TH: 530PE 
R YOUR UORD wflS "J Z 

325 LET a; : J- =y i t; +z 

326 LET Z=S 
32 - PAUSE 150 

32o PRINT AT 19 .0: " 

" ; AT 20,0: ■ 




=1 fiND K=l THEN GOTO 31 
= 1 hND J =15 THEN GOTO 3 
=15 AND Jal THEN GOTO 3 
= 15 RNE> Lf=15 THEN GOTO 
=1 THEN GOTO 3300 



3116 RETURN 



Hcr-i -33^0 3220 



4.n;- = 
















4.o-i; 


NEXT l_ 




PRINT RT iS,££; »$ ! T 




YQUf?";HT 14- ,20; : 'LcT 
































Lti ri-iNi mwcaiaei 














4- " "! -. 






GOTO 4-043 


5000 


REM i«fHH-.tii.l*i 



ZX81 STRATEGY 



5101 CL5 

51CJS G05u5 S5S0 

5113 STOP 



3SS0 LET F> 
3865 LET F ( 
6070 LET F i: 




:"g" THEM 
:"2" THEN 

THEN GO' 



.=.£15 : 
= 2£p . 




e^t* 


TT 










SCiOs 


(H 












■3-"i- 


LET C*tIS -" 




NEXT I 






















■= ■ ■ ■ o 


























LET ■_.$ isoj = 




ZX81 STRATEGY 



14 STEP * 















-:l-._- 


PR JM 






















V ,-■-.- 








RET UP 




9493 


REM * 




Q---.Q. 












J--= : 








LET '.) 





3555 .5" p 5 ■£ : T! = - 3 " 

55~l3 _E^~ 55 : 14 , H ="3" 

■55-= _5~ 5s i.I:3j ="3" 

353d L.ET B* t: 

5555 uc-T I 

5593 = 0R 1=7 TO 9 STEP 

3595 ft gi i --: J) ~"2" 

1533 _ET Bj 

3505 LeT Bs 

3510 LET_EJ 

3520 LET EJ 

3525 LET Bj 

3530 FOR I- 



12 STEP S 



952S NEXT C 

95313 PRINT 

9535 PRINT ■ 

9540 RETURN 



'"THERE RRE i 



12 02 


print raaa 






33^£ 


IF p>4 uR 


■= 03 = 








50. ;=■ 


















PRINT PLh 



GOTO 99AC- 
GOSUB 99 




ZX81 Soft 

Selection 

Nick Pearce is back with 

some more new 

81 Software. 



Matre 81 
Arctan Software 



) lock on to the It 



well. Thev 



thought was jolly good tun. It 

fi-j-siii.:." is ether true or la 
You get points tor giving the- 






to play. They can all be plavec 

using a joystick. 

paroled ZXS1 called Muse o 
prose.' Sho.t sentences ar. 



ime. The question! 
:arefully thought c 



profound at first sight, but on 
in fact made no sense. Occa- 



ZX81 graphic! 

throughout the 




The last Softwi 



Mane 8 1 costs E3. 75 fcfie- 
oue payable to MG Hugr/ms, 
from Arctan Software, Soke 2, 

Assurance House, 35-4 1 Finally on this caesatte is 

Hazlewood Road, Northampton Word Scanner. Thirty or more 

POOter PUZZler and vertical, or along a diagonal. The 

Muse of Pooter ob i ecl ° f cours « l5 w ,l " d ,^|; h 

POOter CameS caoh based on a theme such as 




^HARDWARE REVIEW 



BUZZ! 

q? g 

Derek Mearns has been 

a busy little B — he can be 

seen buzzing around the 

Witney Honey pots. 



In this game for the 16K ZX 
the fly around^orch^oThe 
from the normal arcade gamas in 


was a straight path to the other 


input statement at the beginning. 

play. 

title display followed by the dif- 
ficulty input. This determines 
how many apples you will get 
(eighteen times the difficulty 
level). The screen display will 
then a|)|)ni,r. with vouai the bot- 
tom and the fence at the top 

■O.KI' indicating that you P s'hoij?d 


77777777E77877777777' 


Notice that it is not necessary to 
finish at the fence, you may 

may not under-shoot it. Should 

wilTreturn £cS°tOtto £ttrt. " 

Program 
Description 


iSESi 


variables used. (See figure 1 ) 



READ g: POKE USR CHR* g-t 

N-T f : NEXT g 
DATA €1,6,8,20,63,62,62,21 
36, 24, £0,93, 153, 153, 165, 
DATA 21^,136,69,62,62,69 

3: DATA 3,255,8, 255,. 0,0,0 
INK 71 PRINT AT e,3i"Enti 

lculty <1 TO 10:": INPUT ■ 
iH'.l OR difMET THEN GO 




rr-i-Dt-rrrrrr-rr-Di 


Or.DDpr.ODD- 


10 paper 0: i 


NK At FOR <-l TO 


Jlf: PRINT AT ■ 


IT IRNDttlSJ +1, INT 


(RND-K30.nl j -R- 


: NEXT ( 


50 LET x=16: 


.ET y»15: INK 7: 


PRINT AT 16,t4| 


■ B ■ 


60 INPUT "O.K 


! "I LINE g«: IF 


LEN g«<l THEM 


SO TO 60 


65 IF g«=-0- 


THEN GO TO 1 


70 FOR n=l TO 


LEN g«: IF g«(n) 


<>-5" AND g*(r>> 


<>"*« AND g*(n><> 


■7- AND g«<n)<> 


-S" THEN GO TD t. 



80 NEXT n: FOR n^I TO LEN g«: 
PRINT AT H,y|"fi': PAUSE 20: IF g 
»!n.' = "5" THEN GO TO 120 

90 IF g«'n;-"6" THEN 30 TO 16 

F g«!nl-"7" THEN GO TO 20 
F g*i d!="S- THEN GO TO 24 

120 INK 7: IF ATTR rx,y-lJ-2 TH 
EN GO SUB 230: PRINT AT 19, B)\ F 
LASH 1J- VOU FLEW INTO A l/ALL AN 
D DIED! ■: GO TO 300 

130 IF ATTR (x,y-l)»4 THEN 3D 
SUB 230! PRINT AT 19,01 FLASH II 
"YOU ATE A DEADLY APPLE AND DIED 
!*: PAUSE 200! GO TO 300 

140 PRINT AT K.yj- V LET y-y-1 



■HARDWARE REVIEWS 



: BEEP .2,10: NEXT n: GO TO 400 
160 IF k>14 THEM BO SUB 2B0: P 

RINT AT 19, 01 FLASH 1!" YOU FLEW 
INTO A HALL AND DIED! "1 PAUSE 

200; HO TO 300 

1--0 IF ATTR [X*l,y!»4 THEN GO 

SUB 280: PRItIT AT 19,01 FLASH II 

"YOU ,',TE A DEADLY APPLE AMD DIED 



: BEEP .2,13: MEXT n: GO TO 400 
20? IF .<'2 THEM GO TO 320 
21C IF ATTR :k l,y»-1 THEM GO 

SUB 2B0: PRIHT AT 19,01 FLASH lj 

"YOU ATE A DEADLY APPLE AMD DIED 

!■: PAUSE 200: GO TO 300 
220 PCIMT AT « , y I ' °! LET x-x-1 



FLASH 



YOU DID'NT MAKE IT 



1000 FOR *-l TO 500: NEXT * 
1010 INK 6: PAPER 0: PRINT AT 19 
,01"Pr»a» any key to play again 
*: IF IMKEY*-"" THEN SO TO 
1010 

1020 RUN 

9000 PAPER 0! BORDER 0: CLS 
9003 BORDER 0: PAPER 0: CLS : IN 
K 2: FOR f-0 TO 3! PLOT f,40: DR 
Ml 0,135: PLOT 0,175-f: DRAW 25S 
,0! PLOT 255-+, 175! DRAW 0,-135: 



SUB 233: PRINT AT 19,0! FLASH 11 
" YOU FLEU INTO A HALL AMD DIED! 
■: PAUSE 200: GO TO 300 
230 IF ATTR (x,y+l>=4 THEM GO 
SUB 230: PRINT AT 19,01 FLASH 11 
•YOU ATE A DEADLY APPLE AMD DIED 
!": PAUSE 200: GO TO 300 

260 PRINT AT x,yl" ": LET y-y+ 1 
: BEEP .2,101 NEXT n: GO TO 400 



-l: PRINT AT l,nla*< TO : 

9015 FOR n=l TO 7! PRINT . 

a* In TO > : NEXT n 

9017 LET a*-" DEREK MEA 

RNS " : 

9020 INK 5: FOR n = 30 TO 1 



AT (,01"|'!AT f, 311"|": NEXT 
290 INK 0! PAPER 3: RETURN 
300 GO TO 1000 



330 INK 2! FOR *-6 TO 11: PRINT 
AT f,0|"|-(AT f,3U*l": NEXT f 
340 FOR g-rl TO 2: FOR * = 20 TO 4 

STEP 3! BEEP . 1 , f ! NEXT *: NEX 

T 9 
345 LET a«-" ! ! ! ! ! WELL DONE, YOU 

MADE IT! ! ! ! ! ! ■ 
330 PRINT AT 19,11 INK 2r"BQaBB 



f-1 TO 30: PRINT AT 19,* I INK 
la*tf)I"E": PAUSE 15: NEXT t 
360 GO TO 1000 
400 GO SUB 2B0: PRINT AT 19,0 



9Z1B PRINT AT 6,S 
him into the nex 
the apples are notpcj 



an guide 
ned.The 



keys BUT yoi 

; or this nit 
ng any key 



9240 PRINT AT 21,01 
any key to start": 
THEN GO TO 9240 

9250 RETURN 




Each Issue will be produced in 
cooperation with Eecaan our 
Interplanetory Adviser who on his 
home planet, Aargon, is a member of 
the Association of Supreme Flayers. 
He will be monitoring developments 
in the games industry and advising 
Computer Gamer readers with all 
their gaming problems.. Included in 
each issue will be pages of review of 
the latest games releases, special 
Adventure features and a help-line, 
invaluable articles on how to 'crack' 
specific games a high-score page, 
exciting programs to type in for 
most of the popular home computers, 
news, competitions, reviews of 
peripherals and computers 
themselves if relevant to the games 
field and LOTS more. 



Also, all readers of Computer Gamer 
will have the opportunity to join 
our tremendous Reader's Club — 
each member will receive a 
membership card and a regular 
newsletter which will contain up-to- 
the-minute news and all sorts of 
offers on a variety of products. 




* COMPUTING DECEMBER, 



PROBLEM PACE 



Problem Page 





• "^ ^ 








f-r 


huti 4 


fflwf o 




> 1 A/It. -yX-'-:-: 


'■'■J 7 would-be 










convertabie? 


i^~~~^\ > 


z~^% 


^s ^lil 


Dear Sir, 




m r • f*~ 






backup, a |ife woula^be much 




W n ' 






wis.nr it! ij.iliI.I lead my BASIC 


\ ^4- 


J J\ 






ZXB1 tapes into the Spectrum 


: ^.\JO^$'-^i. 


&Mm®mm 




JMWH 


Do you Know ol any conver- 


Chess 


Eraser 


origins 


,*»„s ,nl M, 












Dear Sir. 


□ear Sir, 








Some time ago 1 bought a IK 


1 have been looking for a way to 






Chess program (or my ZX81 . 


erase a BASIC program if the 




mm iPEEh 23641 


The answer is simple - not The 
ELRoners theonlyone weknew 


After trying several limes It 


program is stopped while 


256 *PEEK 23642) -23552 


he program. Do you know how 


ture of the program and also 


!oed7 


"",°mi, ,%"g,Z 


with issue 1 Spectrums. 


gram in my head which 1 don't 


m;ikinr| it easier to be copied. 
1 have found the POKE com- 






Perhaps if there is such a pro- 




the BREAK'SPACE key Is press- 


10POKE 23659, 0:POKE 


it might be an interesting ptoject 






65365 


OREM cause crash on 


The Netherlands 


ed. 1 wish to find o POKE corn- 


20 LOAD "" CODE 23552 












gram and nol your head which 


loading. Can you help me? 1 own 
a 48K Spectrum and thoroughly 


Bycle 


er use ol colour, line 20 the problems ihiitoiijIIv il-.n. 
In white ink on white issue and we were left with only 


>roker>, then this can he a simple 






e. invisible! Or. by 




s°nn7ac^ne%7drTt P o'o S ha"e 


Michael Cone ty, 


similar 


rTaTsToAD^" o°r III 


looking after this page for a 




Dublin 


LOAD 


-CODE. It ail adds t 




he code ,s held in a REM line a'l 


This seems to be of interest at 


Save it bv SAVE -py b: 


he heginning ol the prcgrvm 


•he momrnt. There really is no 








and the BASIC simply consist* 






., ,■.'■■'.'(,■-■.'.■.' rif.'l.': :.-;,-.s /.'>■■ Sparky, 




program. Just look at the time 


CLEAR 32999 lor some sue 








t and LOAD —-33000 


ZX Computing, 


10SAVE "CHESS" 




Re-sav 




No 1 Golden Square. 


20 RAND USR number 

code held in a first line fl'j V .•■ 


machine code and one ol two 
Otncr U'CkSr the Simplest way is 


after y 


wtet P aZi 3 pZ e an 


London W1R3AB 




fnousei° AD ' C ° Dt rv^a'n'rl'i"t , p U re"'ilio 1 Ttme'' B ''' : '' U 


of your program rememb? ■■-.<■,:■) 


'y^,,,UZ^tZn^Z'wdri e 






































often 16511), of the start of 














your program. 














Now save your program bv 










^^H 




typing CO TO 10 and pmssinn 


pre-loader. 






W ' 4 






NEWLINE. Every time the pro 


Say for instance you have a 






¥ ♦ 


^^ 1 


gram is reloaded from the tape it 


BASIC program. SAVE it as 






f ■ *•__<; *«^ 


*-\. ^H 


allow BREAK to halt theprogram 


S-*^ SP, ° Fmfa 








♦A 






:-:»W« 






9990 SAVE 'prog" CODE 










23552. {PEEK23641 H 256 # 














PEEK23642) - 23552 9995 










gram if the ft AND USR number is 


GOTO 10 










replaced by GOTO line number. 












iju\ preventing a BASIC BREAK 


Now rf it is reloaded using LOAD 


















■ 
















and a questionnaire 
ill respondents please bt 



78 CobdenSt. 

Thornaby, Stockton on Ti 
Cleveland TSt 7 7ET 



Spain 
strathclyde club Hdio f.iends of zx c on 

I am the president of 

D.virZx Computing, grammers club of Castellon n. 



ll computer games arid 



Penpal 


1 am French and live neat 










1 am fourteen years old, anc 








Spectrum 48 K 1 have an Inter- 




face 2 and joystick for m» Spec 
trum48K. 


US Tthere are any clubs thatcor- 


Yours faithfully 


pTan^FTpleasTwtteTomeat 


G. Bentham 




PO Bo* 73 




Ngodwana, N.E. Transvaal 


Yours faithfully 










While we're on the subject of S. 


92400 Camberoie 


Peter Hupton and'ahoTromThe 




■ZX Mushroom Club - , both of 


Eire 










their full addresses. Soil they're 




fettling this and would like to 








we'll be haopv to publish their 


owners. Anybody in the area 



after 7 pm at [o ■' ':■ ) '■■ B ' - 



Spect 


jm - £ 1 


er year or El 


Our address is: 


France 








Jose Manual Martin Saul 














pernic 






Spain. 


would publi 



X COMPUTING DECEMBERIJANUSRY 1: 



■programming tips! 



De-bugger 

Getting a program typed in is often only the 
start of your problems. Ed to the rescue. 



be used, probably iha most 
gram actually works than by 



1 NEXT without FOR 

Look hack throughihep.ogrs 

up - no related FOR 'letter' 



( 




^1 


i 




^M 




B^ ^^m 





leune in Ihenr ■_; 1 1 -. ,H ■ DIM :-,■ 



7 RETURN without GOSUB this and 

Somehow the computer has start pro 

other than via a GOSUB inslruc- usually 

tion. Check a GOTO hasn't been rect line 

entered in place of a GOSUB. READ. 
Check for a missing GOSUB. 



.itrnly l Mr' :j1[i!i-,iliii(| inc. In number then check and dwnjje. 



PRINT AT 0,33 - not allov 



PRINT Y Enie-.'Nt-mli.-H 
PRINT XEnter--Ni:wline 
PRINT AS Enter/Newline 



adjustments to it by + 



IFXMOTHENLETX 
4 Out ol memory 



« look back through 
ii up -usually a LET 



it out? Does tl 
been wrongly a. 



.■leviuus program set RAMtoc 
tefore despairing, enter CLEAR 

he ZX81 SAVE the program. 



■t .llinrj-a Hi I 



■r ot DATA items match how.-^nr. ina; 
.mber of READs; usually ly no rruth in th 
r more) has been missed deliberately inj 



IPROCRAMMINC TIPSB 



Conversion tips 

A guide to ZX81 /spectrum program conversions 
from David Nowotnik. 





















; lor the high resolu 
























iimand PLOT appear 


trgm inc 


;ates Usar Defined 


other. TheZXSI has only two 
commands which are no: pre- 


available on the ZXB 1 . A list 

these appears in Table 4. T 


f on both 


quite different, sc 
Another tip: PEEK anc 


ST! 


facility, so you'll 


SCFOLL and UNPLOT. and 


and functions for which the 


e POKEsh 


onvB b r e slon ad a ddr e s C s B e U 


standard 


character msteed. 




ZXB1 BASIC. Those for cole 




t certainly have to b 






ZX81 programs to the Spec- 


and sound can be ommitte 


; changed 









Z X 8 1 Spectrum Comments 






SCROLL RANDOMISE USR 35B2 If the program uses 

LET t= USR 3582 option. If so. use the 
PLOT Y,X PRINT AT 21 -Y/2.X/2; Print the appropriate 


Q ^§gipr ,inthis 




UNPLOTY.X PRINT AT 21 - Y/2.X/2; Print a space, or the 


appropriate quarter square 




m.tj.r.w.iM. 






Spectrum ZX81 


Comments 




BIN 

eg LET y = BIN LET y = (decimal no.l 
10010101 Conversion to decimal: 
10010101 -149 

128 64 32 16 8 4 2 1 

Add these numbers inq.-Mmr wher 
a 1 appears at the appropriate 


BIN allows the represen- 

binary. On the 2X81 use the 

beware; BIN is often 
used with User Defined 
Graphics, which are not 




READ/DATA LET 
egREADx.y LETX=50 
DATA 50,60 LET Y = 60 


READ and DATA are 
LET instead. 




DEF FN and FN 

eg DEFa(x) = SOR » LETXS^'SQR X" 
LETt = FN alii LETX-I 

LETT= VALXS 


appear in a string. Use 
the keyword for built-in 
functions leg SQRI. The 
equivalent of FN may need 2 




PLOT no equivalant 






SCREENS 

eg LET a = SCREENS x.y LET A = PEEK(PEEK 16396 

+ 256-PEEK 16397 + 1 +Y+33* 


Used in interactive games 
display file. Note - this 
RAM pack is fitted. 




TrtMlSrWu^oZXeico*™**,, 









^PROGRAMMING TIPSj 



ZX81 


Spectrum 




Commen 


a 






1 FRAMES 














POKE 16436,255 


POKE 23672. 0:P0K 


23673,0 


cyrately varies by 50 




POKE 16437,255 
















LET t = (PEEK 23672 


-1-256" 








LETT = (9553d-PEEK 


PEEK 236731/50 




'clock'. The var 


able T will 




16436-256'PEEK 1B437 










seconds after 




/50 


For times greeter the 


i 10 




Thew 












only be L 


sad to 






2 Line number zero 


23674 as well. 






«.«, 


,.„«. 




POKE 16510,0 


POKE 23759,0 














(As the start of BASIC can 












^ Q e U wit e f. 9 ca V u'tion n ' Cr0 




so Is protected. 






3 RAMTOP 

POKE 1638B,X-256"INT 


CLEAR . 




Creates 


safe a 


ea at the 




IX/256) 






top of RAM sta 


ing at address 




POKE 19389, INTIX/2561 












Table 3 G BnB ,al Mwnnwnfen 


hints. 




code etc 
















BEEP 




FORMAT 


ATTR 








BRIGHT 




NVERSE 


FN 








CAT 




MERGE 


IN 








CIRCLE 




MOVE 


OVER 








CLOSE 




OPEN 


POINT 








DATA 




OUT 


SCREENS 








DEFFN 




PAPER 










DRAW 




READ 










ERASE 




RESTORE 










FLASH 




VERIFY 
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LASTK 




6421 


23560 

No Equivalent 


Variable ZX81/ 

T/S1000 


Spectrum/ 
TS2068 




MEM 

MEMBOTT 
MODE 
NXTLIN 




6415 
6477 
6390 
6425 


23656 
23698 
23617 
23637 


BREG 16414 


23655 

No Equivalent 




OLDPCC 
PPC 




6427 
6391 


23621 


CH ADD 1 6406 


23645 




PRBUFF 




6444 


23296 


COORDS 16438 


23677 




PRCC 




6440 


23680 


COORDS (Byte 21 16439 






RAMTOP 




63B8 


23730 


DEST 1 6402 


23629 




SEED 




6434 


23670 


DFCC 16396 


23684 
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DFILE 16396 


No Equivalent 
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6442 


23689 


DFSZ 16416 


23659 




STKBOT 




6410 


23651 


ELINE 16404 


23641 




ST KEN D 




6412 


23653 


ERRNH 16384 


23610 




STOP 




6419 


23660 


EPPC 16294 


23625 




STRLEN 




6430 


23666 


ERRSP 163B6 


23613 




TADDR 




6432 


23668 


FLAGS 1 63B5 


23611 




VARS 




6400 


23627 


FLAGX 16429 


23665 




VERSN 




6393 


No Equivalent 


FRAMES 16436 


23672 




XPTR 




6408 


23647 
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0373 - B30563 
FOR DETAILS 



BSE H 



INTERFACE 007 



INTERFACE 007. E29.9! 




V-, .nrlu-rc! VAI F, ■_,':,:.. 



r - " 1 


1 We use only 


m 


* 10% of our 


| mental 




1 potentials 


''':!■ 


5 








COLLECTORSI GEOLOGISTS! 
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01-437 0699 
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= VIDEO VAULT INTERNATIONAL 
2 10 * REPAIR SERVICE Q 
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MANCOMP LTD. 

(Dept ZX), 
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M19 3JP. 
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ZX COMPUTING 
CLASSIFIED ADVERTISEMENT — ORDER FORM 



II you have something to selt now's your chance! Don't turn the page — turn to us! 
Rates of charge: 40p per word per issue plus 1 5% VAT (minimum of 1 5 words). Please state 
classification and post to: ZX COMPUTING, CLASSIFIED DEPARTMENT, 
1 GOLDEN SQUARE, LONDON W1. 
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